Exercises from Learning Perl