Your skill will accomplish what the force of many cannot |
|
PerlMonks |
Re: General quineby mtve (Deacon) |
on May 20, 2009 at 13:56 UTC ( [id://765228]=note: print w/replies, xml ) | Need Help?? |
inspired: print$`,$`,q(print$`,$`,q(1)=~1,$',$')=~1,$',$'or a bit shorter print$`,$_=q(print$`,$_=q( ),$' x/ /),$' x/ /update: more regex quine print q(print q(1)=~/((\D+)|.)/g)=~/((\D+)|.)/g
In Section
Obfuscated Code
|
|