Help for this page
myfunc(*INPUT, \@arrayold, \@arraynew) ... sub myfunc { my ($file, @array1, @array2) = @_;