my @args = ("name", [1,2,3,4]);

&func(\@args);

sub func {
  my $ref = shift;      # Referenz übernehmen
  for (@{$ref->[1]}) {  # Arrayreferenz in Arrayreferenz
     print $_;
  }
}