Select Code to Download

use strict;

...
my $regr = regression->new(\%raw_data);
$mean_x = $regr->get_mean_x;
print "Mean_x: $mean_x\n";