A little tool in Perl to resize pictures