You declare it in just the same way you would a 1D array:
use strict;
use warnings;
my @AoA = ( ['a', 'b'], ['foo', 'bar'] );
print Dumper \@AoA;
$VAR1 = [
[
'a',
'b'
],
[
'foo',
'bar'
]
];