regression from b9c376111b7ed3137d7ff72286888e7373487142 - rewrite a horrible perl script to saner form ;-)
regression from b9c376111b7ed31 37d7ff72286888e 7373487142 - rewrite a horrible perl script to saner form ;-)