On 12/21/2006 12:42 AM, Tom Smith wrote:
Mumia W. wrote:use strict; use warnings; $_ = `id $ARGV[0]`; s/.*?groups=// && print "@{[ /\((\w+)\)/g ]}\n";I'm not trying to be argumentative or say that this is "wrong"... But does anyone else agree with this? If so, why is this way better than the pure Perl way?
I should have put a smiley in my post :-) -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
