使用 arrayref 將陣列傳遞給 sub

@foo 的 arrayref 是\@foo。如果你需要將陣列和其他內容傳遞給子例程，這很方便。傳遞 @foo 就像傳遞多個標量一樣。但是傳遞\@foo 只是一個標量。在子程式內：

xyz(\@foo, 123);
...
sub xyz {
    my ($arr, $etc) = @_;
    print $arr->[0]; # using the first item in $arr. It is like $foo[0]