Re: [Boston.pm] More Perl Style

2006-01-02 Thread Richard Morse
On Dec 24, 2005, at 12:52 AM, Uri Guttman wrote: FL == Federico Lucifredi [EMAIL PROTECTED] writes: FL I went with a variant of this one as it seems the most elegant option FL when having to retain setting the flag to terminate the outer loop. too FL bad there isn't a

Re: [Boston.pm] More Perl Style

2005-12-23 Thread Federico Lucifredi
Hello Uri, Thanks for the input. comments are below: since @triggers must be the same length as @commands then use that fact: my @triggers = ('0') x @triggers ; that's a good idea -- that I actually recently used. in this case I left the list explicit b/c the triggers will not

Re: [Boston.pm] More Perl Style

2005-12-23 Thread Uri Guttman
FL == Federico Lucifredi [EMAIL PROTECTED] writes: since @triggers must be the same length as @commands then use that fact: my @triggers = ('0') x @triggers ; FL that's a good idea -- that I actually recently used. in this case I left FL the list explicit b/c the triggers will not

[Boston.pm] More Perl Style

2005-12-20 Thread Federico Lucifredi
Hello Guys, More Perl Style lessons for me, if anyone wants to chip in. Following is the script on the chopping block today - in the comments the parts that I did not manage to elegantize as much as I wanted. use Term::ANSIColor qw(:constants); use strict;

Re: [Boston.pm] More Perl Style

2005-12-20 Thread Uri Guttman
FL == Federico Lucifredi [EMAIL PROTECTED] writes: FL use strict; where is use warnings? FL my @commands = ( '/bin/netstat -ape | /usr/bin/wc -l', FL '/usr/bin/lsof | wc -l', FL '/bin/ps ax -L | wc -l' ); FL my @triggers = qw( 0 0 0); since

Re: [Boston.pm] More Perl Style

2005-12-20 Thread Ben Tilly
On 12/20/05, Federico Lucifredi [EMAIL PROTECTED] wrote: Hello Guys, More Perl Style lessons for me, if anyone wants to chip in. Following is the script on the chopping block today - in the comments the parts that I did not manage to elegantize as much as I wanted. use Term::ANSIColor