Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

wxObfu

by Jouke (Curate)
on Sep 03, 2003 at 09:53 UTC ( #288572=obfuscated: print w/ replies, xml ) Need Help??

use Wx;sub qq{open$Wx=>$0;scalar<$Wx>=~m$;$;Wx::MessageBox($1=>$`) &&exit}@p::ISA=Wx::App,*p::OnInit=*qq;p->new->MainLoop;
If you put this obfu in a file, remove any leading whitespace or newlines and leave the linebreaks as they are, it all should work.

Jouke Visser, Perl 'Adept'
Using Perl to help the disabled: pVoice and pStory

Comment on wxObfu
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (10)
As of 2014-12-19 20:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (91 votes), past polls