laziness, impatience, and hubris PerlMonks

### Re: Visually-Interlaced Mesmerizing Japh (Mini Spoiler)

by imp (Priest)
 on Sep 06, 2006 at 04:22 UTC ( #571370=note: print w/replies, xml ) Need Help??

chr(
5 * (
...
+ l(\$char3)
+ 2
)

int ( ord(\$char) - 42) / 16

[::j] chr(2+5*(5*l(:)+l(:))+l(j)) = chr(5*(5*1+1)+4+2) = \$
[jJj] chr(2+5*(5*l(j)+l(J))+l(j)) = chr(5*(5*4+2)+4+2) = t
...
[jJ*] chr(2+5*(5*l(j)+l(J))+l(*)) = chr(5*(5*4+2)+0+2) = p
[>>N] chr(2+5*(5*l(>)+l(>))+l(N)) = chr(5*(5*1+1)+2+2) = "
[N>N] chr(2+5*(5*l(N)+l(>))+l(N)) = chr(5*(5*2+1)+2+2) = ;

\$t = "v.tmp";

\$t="v.tmp";open(\$f,">\$t");
print \$f "
...
";close\$f;
system("gvim -c \"so \$t\" \"\$0\"")
#jcn

+ehilmpqtuxy-]","[/.016-9>?@^_`af-in-qv-y]","[2-9b-ir-y]","John C. Nor
+ton 'liverpole'"]
let vector=8
...
end
sleep 100m
endwhile

Create A New User
Node Status?
node history
Node Type: note [id://571370]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (3)
As of 2018-03-23 21:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
Voting Booth?
When I think of a mole I think of:

Results (297 votes). Check out past polls.

Notices?