Perl challenges