- or download this
@array = ( [ "foo", "bar"],
[ "abc", "def"] );
- or download this
while ( <FILE> ) {
push @array, [ split ];
}
- or download this
for $i (0..$#array) {
for $j (0..$#{$array[$i]}) {
print "Element $j of project $i is $array[$i][$j]\n";
}
}