My Exercises from brian d foy's book: "Learning Perl"