my @aoa = ( ['a' .. 'c'], ['d' .. 'f'], ['g' .. 'i'] );

print "[", @$_, "]\n" for @aoa;

__output__

[abc]
[def]
[ghi]

##</code><code>##

my @aoa = ( ['a' .. 'c'], ['d' .. 'f'], ['g' .. 'i'] );

print "first element - ", $_->[0], "\n" for @aoa;

__output__

first element - a
first element - d
first element - g