Math-Basic-XS
view release on metacpan or search on metacpan
lib/Math/Basic/XS.pm view on Meta::CPAN
my $max = Math::Basic::XS::max { $_->{value} } @data;
my $sum = Math::Basic::XS::sum { $_->{value} } @data;
my $mean = Math::Basic::XS::mean { $_->{value} } @data;
my $median = Math::Basic::XS::median { $_->{value} } @data;
my $mode = Math::Basic::XS::mode { $_->{value} } @data;
}
});
...
Benchmark: timing 1000000 iterations of Math::Basic, XS...
Math::Basic: 5 wallclock secs ( 5.00 usr + 0.00 sys = 5.00 CPU) @ 200000.00/s (n=1000000)
XS: 2 wallclock secs ( 2.21 usr + 0.05 sys = 2.26 CPU) @ 442477.88/s (n=1000000)
=head1 AUTHOR
LNATION, C<< <email at lnation.org> >>
=head1 BUGS
( run in 0.757 second using v1.01-cache-2.11-cpan-71847e10f99 )