myMultipleArgSub(\@first,\@second,\%third); #### my ($xarray,$values,$xlabel,$ylabel,$title) = shift(@_); #### my $xarray = shift; my $xarray = shift; my $values = shift; my $xlabel = shift; my $ylabel = shift; my $title = shift; #### my ($xarray,$values,$xlabel,$ylabel,$title) = @_; #### push @data,$_ for @{$xarray}; push @data,$_ for @{$values}; #### use strict; use warnings;