use strict; #determine zip location and then addid to the environment if(-f 'c:\program files (x86)\winzip\wzzip.exe') { print 'Setting zip exe location to c:\program files (x86)\winzip\wzzip.exe'."\n"; my $zipexe="c:\\program files (x86)\\winzip\\wzzip.exe"; print "zip_exe = <$zipexe>\n"; } if(-f 'c:\program files\winzip\wzzip.exe') { print 'Setting zip exe location to c:\program files\winzip\wzzip.exe'."\n"; my $zipexe ='"c:\program files\winzip\wzzip.exe"'; print "zip_exe = <$zipexe>\n"; }else{ my $zipexe=''; die "Could find wzzip.exe"; } print "zip_exe = <$zipexe>\n";