Win8 Strawberry 5.8.9.5 (32)  Mon 09/20/2021 15:47:19
C:\@Work\Perl\monks
>perl -Mstrict -Mwarnings

use Data::Dumper;

my $ar_1 = [ qw(knights who say ni) ];
my $ar_2 = [ qw(foo bar baz quux) ];

# push @$ar_1, @$ar_2;
$ar_1 = [ @$ar_1, @$ar_2 ];

print Dumper $ar_1;

^Z
$VAR1 = [
          'knights',
          'who',
          'say',
          'ni',
          'foo',
          'bar',
          'baz',
          'quux'
        ];