Mike Liss wrote:
> Sorry,
>
> I should have said... "How would I iterate over these arrays using
> foreach"
> Mike
using foreach? have you try this yet?
#!/usr/bin/perl -w
use strict;
my @array = ([[1..5],[2..6],[7..10]],[[11..15],[16..20],[21..25]]);
foreach(my $i = 0; $i < @array; $i++){
foreach(my $j = 0; $j < @{$array[$i]}; $j++){
foreach(my $k = 0; $k < @{$array[$i][$j]}; $k++){
print "$array[$i][$j][$k]\n";
}
}
}
__END__
david
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
