my (%hashref_return_A) = correlation(\@primarys_array, \@secondarys_array); #### Reference found where even-sized list expected at script.pl line 576 #### sub correlation { my ($x_ref, $y_ref) = @_; my $lfit = Statistics::LineFit->new(); $lfit->setData($x_ref, $y_ref);