Perl conversion tool