Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Ajaph

by throttle (Beadle)
on Oct 31, 2004 at 22:03 UTC ( #404164=obfuscated: print w/replies, xml ) Need Help??

This is just another JAPH, not so obfuscated but nice
#!/usr/bin/perl ######################################## ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;$unsfl=";;;;iawhrri4nrwayrwyrnca;;;";;; ;$q=$_;;;my$j="Ja\b\000uSa\bt";;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; $a="\0An\0OtH\123\beR";#;#;#;#;#;#;#;#;# $perl="\0\0\0\0\0\0\0\0P\bP;)\b\beRl\0"; $ntn="".""."".""."".""."".""."".""."";#; $h=qw/HaCk/."";"Is this a Perl Hack???"; "GIVE ME";my$s="\040";#!!!!!!!!!!!!!!!!! ######################################## print$j.$s.$ntn."".$a.$s.$perl.$s.$h;;;#

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: obfuscated [id://404164]
Approved by teamster_jr
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (2)
As of 2021-10-28 00:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My first memorable Perl project was:







    Results (95 votes). Check out past polls.

    Notices?