[Date Prev][Date Next][Thread Prev][Thread Next]
[Search]
[Date Index]
[Thread Index]
[FWP] my first japh :)
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?
suggestions?
(be nice? :)
Kye :)
==== Want to unsubscribe from Fun With Perl? Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
==== unsubscribe