|
|
|
| Problems? Is your data what you think it is? | |
| PerlMonks |
religious $A++by stefp (Vicar) |
| on Sep 20, 2001 at 21:15 UTC ( [id://113638]=obfuscated: print w/replies, xml ) | Need Help?? |
|
eval qq|\$@{ [(join( "\0",qw( Abbot Abbey Amen ))=~ m/^([^\0]*)[^\0]*(\0\1[^\0]*)*$/)[0]]}++|
-- stefp
Back to
Obfuscated Code
|
|
||||||||||||||||||||||