Little Perl tools I have been messing with. Most are ugly and inefficient.