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]

Replies are listed 'Best First'.
RE: Tree on horizon, also a simple poem
by Ozymandias (Hermit) on Jul 24, 2000 at 00:44 UTC
    Gotta agree that the poem itself wasn't very, um, pleasant, but I really like what you've got here. Pleasant looking code (although your tree is a little lopsided) with the poetry hidden in the output. Very nice.

    - email Ozymandias
[reply]
RE: Tree on horizon, also a simple poem
by gryng (Hermit) on Jul 23, 2000 at 18:16 UTC
    The actual poem was a tad horrid :) , I guess I should be glad you didn't mention any blood and guts :P .

    Ciao,
    Gryn

[reply]
      hehe, the author of that poem was a friend I had in 5th grade
      for some reason I still remember the stupid thing :)



      lindex 
      /****************************/
  jason@gost.net, wh@ckz.org
    http://jason.gost.net
/*****************************/

      [download]
[reply]
[d/l]
RE: Tree on horizon, also a simple poem
by thaigrrl (Monk) on Oct 27, 2000 at 01:51 UTC
    I liked that, It was quite amusing ;-)
[reply]
RE: Tree on horizon, also a simple poem
by AgentM (Curate) on Oct 27, 2000 at 01:56 UTC
    yeah, baby! go! ++ I was trying to pinpoint what i was missing from PM- it's GORE!!! Bring on the blood-squirtin' action!
    AgentM Systems nor Nasca Enterprises nor Bone::Easy nor Macperl is responsible for the comments made by AgentM. Remember, you can build any logical system with NOR.
[reply]

Back to Perl Poetry