use CGI;@biff = ('|84','|104','|101',
     '|114','|101','|37|50|48','|111','|110',
    '|99','|101','|37|50|48','|119','|97','|115',
   '|37|50|48','|97','|37|50|48','|98','|111','|121',
  '|37|50|48','|37|48|65','|87','|104','|111','|37|50
 |48','|106','|117','|109','|112','|37|50|55','|100','
|37|50|48','|97','|110','|100','|37|50|48','|102','|101',
 '|108','|108','|37|50|48','|111','|102|102','|37|50|48','
   |97','|37|50|48','|99','|108','|105','|102','|102',
    '|37|48|65','|72','|101','|37|50|48','|102','|101',
       '|108','|108','|37|50|48','|119','|105','|116',
         '|104','|37|50|48','|97','|37|50|48','|98',
             '|111','|117','|110','|99','|101','|37
               |50|48','|97','|110','|100','|37|50|48',
                   '|102','|111','|114',
                     '|101','|118',
                         '|101',
                          '|114'
,'|37|50|48','|119','|111','|117','|108','|100','|37|50|48','|98','|11
+1','|117','|110','|99','|101','|37|50|48','|37|48|65','|84',
'|105','|108','|108','|37|50|48','|104','|101','|37|50|48','|119','|97
+','|115','|37|50|48','|100','|101','|97','|100','|37|50|48',
'|97','|110','|100','|37|50|48','|97','|37|50|48','|115','|116','|105'
+,'|102','|102','|46','|37|48|65'); map { map { $string .= 
chr($_) unless(!$_); } split(/\|/,$_); } @biff; print CGI::unescape($s
+tring);

[download]

In reply to Tree on horizon, also a simple poem by lindex

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.