more correct definition of perl path in test script