rosetta: Perl