On Nov 30, 2005, at 12:03 AM, Federico Lucifredi wrote: > my $maxlen = 4; > > my @indices = (0, 0, 0, 0); # how do I init this array so that it is > $maxlen zeros long ?
my @indices = 0 x $maxlen;
> unless (++$i == $maxlen)
> { last; } # can we get rid of some braces somehow ?!
last unless (++$i == $maxlen);
_______________________________________________
Boston-pm mailing list
Boston-pm@mail.pm.org
http://mail.pm.org/mailman/listinfo/boston-pm
