Select Code to Download

sub myfunc($\@\@$) {
  my $var1 = $_[0];
...
  my @arr2 = @{$_[2]};
  my $var2 = $_[3];
}

@arr1[3]

---

$tmp1->[3]