use Clone 'clone';
my @AoA3 = @{ clone( \@AoA1 ) };
say @AoA3; # ARRAY(0x7c46c0)ARRAY(0x7c4720)

use Storable qw/freeze thaw/;
my @AoA4 = @{ thaw( freeze( \@AoA1 ) ) };
say @AoA4; # ARRAY(0x7095c8)ARRAY(0x709718)

my @AoA5 = map { [ @$_ ] } @AoA1;
say @AoA5; # ARRAY(0x67ff58)ARRAY(0x7e8468)