my @two_d = (
    [(undef) x 5],
    [(undef) x 5],
    [(undef) x 5],
    [(undef) x 5],
    [(undef) x 5],
);

##</code><code>##

my @two_d;
push @two_d, [(undef) x 5] for 1 .. 5;