Select Code to Download

 ($r_array1, $r_array2) = foo();
  print "@$r_array1\n";
  print "@$r_array2\n";
...
      my @array2 = (6..10);
      return (\@array1, \@array2);
  }