← Back to Users
anagogue's activity in the archive.
hrm... regex's are SO not the most obfuscated thing in perl... they don't actually DO anything control-wise.. eval { chomp; ($i ? eval { $i = 0; @thingies = split(/\t/) } : (push @snarf, "$_\n")) } for <SLURP>; is when it STARTS to get fun :)
Slashdot Mirror
hrm... regex's are SO not the most obfuscated thing in perl... they don't actually DO anything control-wise..
:)
eval { chomp; ($i ? eval { $i = 0; @thingies = split(/\t/) } : (push @snarf, "$_\n")) } for <SLURP>;
is when it STARTS to get fun