#not terribly creative, or attractive, but...

print chr hex for (shift =~ /FF/, q{

    7324A361B4
    4A75737420
    616E  6F74
    6865  7220
    5065726C20
    4861636B65
    7221
    FF63
    9A4B
    64A2 ... for Perl :-)
    
} =~ /\w{2}/g)[5..29] ;