basic perl file input and output:
October 11th, 2007 by Lawrence David
an example of how to read in the contents of a file and then write them out, in perl
open(INPUT,$ARGV[0]);
open(OUTPUT,”>$ARGV[0].out”);while (<INPUT>) {
print OUTPUT $_;
}close(INPUT);
close(OUTPUT);
