Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

One-Line Quine

by beretboy (Chaplain)
on Jun 08, 2002 at 03:34 UTC ( [id://172735]=obfuscated: print w/replies, xml ) Need Help??

My little obfuscated quine:
my $c=";";my $q=q;print 'my $c="'.$c.'"'.$c.'my $q=q'.$c.$q.$c.$c.'eva +l $q'.$c;;eval $q;


"Sanity is the playground of the unimaginative" -Unknown

Replies are listed 'Best First'.
Re: One-Line Quine
by Aristotle (Chancellor) on Jun 08, 2002 at 15:12 UTC
    Beautiful :-)
    ____________

    Makeshifts last the longest.
I tweaked it a bit
by Anonymous Monk on Jun 14, 2002 at 02:52 UTC
    this may defeat the point of trying to obfuscate it, but i think shorter is better.
    this is only 74 characters to your 89 (although removing whitespace is cheap) my$c=';';my$q=q;print"my\$c='$c'${c}my\$q=q$c$q$c${c}eval\$q$c";;eval$q;

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (6)
As of 2024-04-25 15:24 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found