Adding some Perl code eval solutions.