I wrote this multi-layered instead of doing homework. It's not really that special, but it was fun anyway. For best effect, load into Vim with perl syntax highlighting. 
     ###############################
     eval(reverse(pack('c*',map(hex#
     ("0x$_")+4,grep(!m#[^0-9a-f]#,#
     ###############################
     qw&)))));;;;;;;;;;;;;;;;;;;;;;#
     qw( 79 25 25 5b 3c 1c 28 25 ),#
     qw( 30 27 5b 20 24 6e 64 5f ),#
     qw( 1c 6c 5d 69 24 28 25 24 ),#
     qw( 6d 24 6a 65 6b 66 1c 68 ),#
     qw( 5d 72 61 77 73 6d 1c 5e ),#
     qw( 71 6f unpack grep print ),#
     qw&)))));;;;;;;;;;;;;;;;;;;;;;#
     ###############################
##########################################
&qw(qw@6 6 6@                            #
,qw(111  113 94 28 115 107 110 96 28 119)#
,qw(105 117 28 32 111 100 101 98 112    )#
,qw(57 111 100 101 98 112 55 101 98     )#
,qw(36 32 111 100 101 98 112 28 97      )#
,qw(109 35 70 113 111 112 35 37 119     )#
,qw(111 113  94 119 108 110 101 106     )#
,qw(112 32 111 100 101 98 112 42 35     )#
,qw(28 35 42 111 100 101 98 112 121     )#
,qw( 55 121 97 104 111 97 119 111 113   )#
,qw(94 119 32 111 100 101 98 112 42     )#
,qw(35 28 35 42 111 100 101 98 112 121  )#
,qw(55 121 121 115 107 110 96 36 35 70  )#
,qw(113 111 112 35  37 41 58 36 115 107 )#
,qw(110 96 36 35 61 106 107 112 100 97  )#
,qw(110  35 37 41 58 36 115 107 110 96  )#
,qw(36 35 76 97 110 104 35 37 41 58 36  )#
,qw(115 107 110 96 36 35 68 93 95 103 97)#
,qw(110 35 37 41 58 36 30 88 106 30 37  )#
,qw(37 37 37 55 6 6 6)                   #
);                                       #
##########################################

[download]

In reply to JAPH Stove by Dylan

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.