happy perl obfuscation #425234569807
Posted Wed, 04 Aug 2004
perl -e '$foo = "hello there"; $foo =~ /(?{chop}){4}/; print "$foo\n"'
Nuff said.
You may have to look up what (?{...}) does in perldoc perlre
perl -e '$foo = "hello there"; $foo =~ /(?{chop}){4}/; print "$foo\n"'
Nuff said.
You may have to look up what (?{...}) does in perldoc perlre