Select Code to Download

process_something($scalar1, $scalar2, \@list1, \@list2);

...
    my @list1 = @$ra_list1;
    my @list2 = @$ra_list2;
}

my $rh_params = {
    scalar1 => $scalar1,
...
    my @list1 = @{$rh_params->{list1}};
    my @list2 = @{$rh_params->{list2}};
}