My first ™ obfu.
Actualy prints the alphabet. _MY_ alphabet that is... >:)
$/="";$_=<DATA>;
sub up{return
("sub ".uc(shift
()))};s/\n//gim;
@_=split/\;/;for
(0..$#_){$_[$_]=~
s/^(\w{1}\{)/&up
($1)/e;$_[$_]=~
s/japh/print/;
eval("$_[$_]");}
&A,&L,&P,&H,&A,&B,&E,&T;
__DATA__
a{japh"s
"};l{jap
h"i"};p{
japh"n"}
;h{japh"
i"};b{ja
ph"t"};e
{japh"e"
};t{japh
"r\n\n"}
A righthanded-lefthand....
"Field experience is something you don't
get until just after you need it."
In reply to ALPHABET
by Sinister
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|