Useless but nonetheless interesting Perl scripts.