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

Just Another Python Hacker

by japhy (Canon)
on Sep 20, 2000 at 08:05 UTC ( [id://33246]=obfuscated: print w/replies, xml ) Need Help??

Yeah, right.
use overload;BEGIN{overload::constant "q",sub{$_[1]=~s/\^(.)/qq!"\\c$1"!/eeg,return$_[1]}} print "Just Another Python^H^H^H^H^Herl Hacker\n";


$_="goto+F.print+chop;\n=yhpaj";F1:eval

Replies are listed 'Best First'.
RE: Just Another Python Hacker
by ncw (Friar) on Sep 22, 2000 at 15:53 UTC
    If I try this on 5.005_03 built for i386-linux I get "Out of memory!" error.

    It works fine on v5.6.0 build for i686-linux though!

      5.005_03 on 386-linux does have a known bug that comes from using the string "Python" in a Perl program.

      $_="goto+F.print+chop;\n=yhpaj";F1:eval
        I hope you are pulling my leg japhy, but I don't see a smiley up there ;-)

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others sharing their wisdom with the Monastery: (1)
As of 2024-04-24 16:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found