perl -e 'map{printf"%02X"x4,unpack"C4",gethostbyname"$_.aacs.phroggy.com"}qw/Just another Perl hacker/'

Probably not terribly original; how can I make it better?