perl process.pl input.txt > output.txt

##</code><code>##

while (<>) {
	print "Reading from: $ARGV, Writing to: $???\n";
}