I have never tried to write obfuscated Perl before (though some of my colleagues may tell you I have done it unintentionally), so here goes nothing. It just a JAPH so go easy, its my first time :).

map{$|++&&s**"\x70\x72\x69\x6E\x74 ". $
".qq^\x63\x68\x72 \x28\x68\x65\x78 \x29
^ .q @; @ .qq< \x73\x65\x6C\x65\x63\x74
\x28 \x24 \x61 \x2C\x24\x62\x2C\x24\x63
\x2C \x30\x2E\x31 \x29 >*ee;}map {split
m%(..)% }split m#~#,'4A757374~20~416E6F
74686572~20~5065726C~20~4861636B65722C'
[download]

I think I spent the most time trying to get it to line up evenly.

Update: This doesn't run correctly with warnings on.