Small collection of PERL scripts I use frequently