ALWAYS ALWAYS ALWAYS put "use strict;" at the top of your script. If you are learning Perl from a book that doesn't explain strict, you need a better book.my @servers = qw( foo bar baz quux ); while (@servers) { my @group = splice @servers, 0, 3; print "group: @group\n"; }
In reply to Re: Need script help
by Anonymous Monk
in thread Need script help
by jmckinzie
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |