2 ms·

Very nicely done. I use Perl in my everyday job, and its nice to see that some people still know how to write good Perl.