Perplexing Personalized Perl Present Polyglot

You have received some Perl code as a birthday present and you want to know what it does. You have come to the right place. Copy your Perl code and paste it in the box below. Press the Run button if the message does not display automatically. If you get an error make sure you copied all of it.

If you know how to run a Perl program you could, of course, just run it.

Perl code:

Perl output:

I got the idea to do this from a page I found during a Google search.