$ perl test.pl file.txt