$ perl script.pl input.txt > output.txt
oder:
$ perl script.pl < input.txt > output.txt