Select Code to Download

#! perl -slw
use strict;
...
print "reading $infile; writing $outfile";

exit 99;

#! perl -slw
use strict;
...
waitpid $pid, 0;

print "$progname ended: status: ", $? >>8;

c:\test>junk32
enter file name  (you must specify the file name and press Enter)
...
reading myInfile; writing myOutfile
junk33 ended: status: 99