Re: passing multiple items to a subroutine

myMultipleArgSub(\@first,\@second,\%third);

Select or download this
my ($xarray,$values,$xlabel,$ylabel,$title) = shift(@_);

my $xarray = shift;
my $xarray = shift;
...
my $xlabel = shift;
my $ylabel = shift;
my $title  = shift;

Select or download this
my ($xarray,$values,$xlabel,$ylabel,$title) = @_;

push @data,$_ for @{$xarray};
push @data,$_ for @{$values};

use strict;
use warnings;

Select Code to Download