for my $row (@{$table}) {
    for my $column (@{$row}) {
        print "$column\n";
    }
}