RosettaCodeData/Task/Array-concatenation/Perl/array-concatenation-2.pl

5 lines
103 B
Perl
Raw Permalink Normal View History

2013-04-10 14:58:50 -07:00
my @arr1 = (1, 2, 3);
my @arr2 = (4, 5, 6);
push @arr1, @arr2;
print "@arr1\n"; # prints "1 2 3 4 5 6"