perl thescript.pl file2.txt >file1.txt