Output of perl script under optimal conditions