for my $row_ref (@array_2d) {
    for my $item (@$row_ref) {
        print "$item ";
    }
    print "\n";
}