- or download this
for my $row (@{$table}) {
for my $column (@{$row}) {
print "$column\n";
}
}
- or download this
for my $row (@table2) {
for my $column (@{$row}) {
...
}
}
}
- or download this
push (@{$table2[0][1]}, 13);
print "@{$table2[0][1]}\n"; # prints 10 11 12 13