[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [FWP] my first japh :)



Kye Leslie <kye@canningcollege.wa.edu.au> writes:

> Hi guys.. :)
> here is my first japh:
> 
> $;=26;$,=84;$"=$,;$_='--i$(f/s;({)}".)${.((+).$1'.
> ')3$/==/o$;;2r$$d=$"-(=;$4)+1$+%,;$ni;trp(r $hc;'.
> ')=e9-};v#laxnSqYj5{{}uw})j{|n)n~)TtqlZi&';s/(.)(.
> )/$2$1/xg;s/(.{2})(.)(.{3})/$3$1$2/g;eval;print$/;
> 
> comments?

It prints "Just another Perl hacker,".
Canonical form is "Just another Perl hacker."

Now to work how how it does it...

-- 
Piers


==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe