Execises implemention for 'Learning Perl'