Miscellaneous Perl scripts I write, whenever I feel compelled to write them