use t::locale_hack;
use Test;
use Statistics::Basic qw(:all toler=0);
plan tests => 1;
my $mean = mean(1,3,7);
ok($mean != 3.7);
use t::locale_hack;
use Test;
use Statistics::Basic qw(:all toler=0);
plan tests => 1;
my $mean = mean(1,3,7);
ok($mean != 3.7);