You can't return two arrays since functions only return lists, but you can return a list with two (or more) array references. In its most readable format it would look something like this:

sub mySub
{
  my $array_ref1 = \@array1;
  my $array_ref2 = \@array2;

  return ($array_ref1, $array_ref2);
}

my ($arr_ref1, $arr_ref2) = mySub();

my @array_ref1 = @{$arr_ref1};
my @array_ref2 = @{$arr_ref2};
[download]