Perl utilities