Ok, i've been hanging out here almost two months, and I guess sooner or later I have to do a JAPH obfu, right? Is there any tradition of writing these when there's more pressing, productive things to do? If so, I've been true to tradition... 
#!/usr/bin/perl -w
use strict;my%

g = ('D\J{N]QRR\&S.HAy7z9 r['=>'  => got perl ? <= ');my@
o = keys%g;my@
t = split"",(shift@o);my$

p = pack'c',74;my$
e = sub{while(@_){my$
r = shift;$!=unpack'c',$r;my$
l = shift;$p.=substr$!,(unpack'c',$l)/10,
      (unpack'c',$l)%10;}};
      &$e(@t);print$p,$/;

[download]

Despite use strict, it may not work on versions of perl with drastically different error messages ;)

Update: As chipmunk has pointed out, this code relies on system error messages, not Perl error messages. As a result, it will only run properly on a FreeBSD 4.x system. (By pure luck, it's been tested on 4.1 and 4.3, but only because I happened to upgrade my system between printing out the error messages and actually writing the code.)

So consider my first JAPH a real learning experience, and a bit more obfuscated than planned - even when it runs, one does not know what it did ;-)

Maybe I should have called it "Got FreeBSD?"

Thanks, chipmunk!

In reply to got perl? by ginseng

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.