perl foo.pl < infile > outfile