Perl utilities I wrote