And finally … some Perl