print_data(\@array1, \@array2);

sub print_data {
    my @data1 = @{$_[0]}; #dereferences first array into @data1
    my @data2 = @{$_[1]}; #dereferences second array into @data2
}