>perl -wMstrict -le
"my @a1 = qw(a b c);
 my @a2 = qw(p q r);
 my @a3 = qw(x y z);
 my @M = (\@a1, \@a2, \@a3);
 ;;
 print $M[0];
 print \@{$M[0]};
 ;;
 print 'array references are the same' if $M[0] == \@{$M[0]};
 ;;
 print qq{-@{\@{$M[0]}}- -@{$M[0]}-};
"
ARRAY(0x43281c)
ARRAY(0x43281c)
array references are the same
-a b c- -a b c-