Problems Processing Personalized Perl Presents

The original directions were so simple they were not written down. Save the code in a text file and run it with perl.

$ perl birthday.pl
Happy Birthday JAPH!!

This no longer works with modern perl (>5.16).

$ perl birthday.pl
Eval-group not allowed at runtime, use re 'eval' in regex m/(?{print "Happy Birthday JAPH!!",$/})/ at birthday.pl line 1.

You can see the print line in there. It would have printed everything between the double quotes. If you want it to run properly you need to add a command line argument to perl like this:

$ perl -Mre=eval birthday.pl
Happy Birthday JAPH!!