Perl 參照問題 \(1..5):參照陣列的第一個元素 ; \@arr:參照陣列

#ListInput.pl


use warnings;
sub listcat{
    my(@append) = @{$_[1]};
    push @{$_[0]},$_ for (@append);
    return @{$_[0]};
}




my @arr1 =(1..5);
my @arr2 =(6..10);
@get = listcat (\@arr1,\@arr2);
print "@get";#1 2 3 4 5 6 7 8 9 10


#Not an ARRAY reference at ListInput.pl line 5.
@getFirstElement  = listcat (\(1..5),\(6..10));




#@get = listcat(\(1..5),\(6..10))發生錯誤
#因為(1..5)(6..10)參照的是陣列是第一個元素
#所以參照了第一個陣列的第一個元素
#以及參照了第二個陣列的第一個元素