perl proj2_2.pl part2.txt