My second obfu, took me a few hours this week.

#!/usr/bin/perl -w
use strict;
our(@nums,@lets,$let,$num);

            @nums = ("5","1","2","1","1" ,"6","1","1","1","1"
            ,"2","1","1","2","1", "1","8","1","5","1","3","1"
            ,"1","8","1","6","2" ,"6","1","1","1","1","9","1"
            ,"1","2","1","1", "9","1","1","2","1","1","1","8"
            ,"1","6","1","7","1","1","2","1","1","2","1","1","7","1","
+1","3","1","1"
            ,"1","8","1","5","2","6","1","1","9","1","1","2",         
+       "1","1",
            "1" ,"2","1","1","1","2","1","1","1","2","1","1",         
+         "1","8"
            ,"1","1","2","1","1","2","1","1","7","1","1","6",         
+           "1",
            "1", "1","6","1","1","5","1","3","1");@lets=(" ",         
+            "H"
            ," ", "H","\n"," ","\\"," ","/","\n"," ","H"," ",         
+            "-"
            ," ", "C", " ","O"," ","H"," ","H","\n"," ","\\",         
+            " "
            ,"\/"," ","\\"," ","\/","\n"," ","N"," ","-"," ",         
+            "C"
            ," ","C"," " ,"-"," ","H","\n"," ","\/"," ","\\",         
+            " "
            ,"\/","\n", " ", "O"," ","="," ","C"," ","C"," ",         
+             "-"
            ," ","N","\n"," ","\\"," ","\/"," ","\\","\n"," "         
+            ,"N"
            ," ","-", " ","C"," ","-"," ","N"," ","="," ","C"         
+           ," ",
            "-", " ","H", "\n"," ","\/","\n"," ","H"," ","-",         
+         " ","C"
            ," ","caffeine","\n"," ","\/"," ","\\"," ","(C8H10N4O2)","
+\n"," ","H"," ",
            "H","\n");while (@nums){$num = shift(@nums); $let
            = shift (@lets); print "$let"x$num; };print "\n";

[download]

Caffeine is good :)

The Evil but Fickle Dr Lambado

UNIX: measuring in inconvenient units since 57,974,400!

In reply to Caffeine by dr_lambado

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.