use Data::Dumper;

my @myArray = (1,2,3);
my @myArrofArray = ();

push (@myArrofArray, \@myArray);

print Dumper(\@myArrofArray);

##</code><code>##

$VAR1 = [
          [
            1,
            2,
            3
          ]
        ];