$ perl mycode.pl input_file.txt > output.txt