Just a couple of random things (mainly Perl scripts)