#!/usr/bin/env perl
use warnings;
use strict;
use App::Benchmark;
benchmark_diag(
2_000_000,
{ sqrt => sub { sqrt(2) },
log => sub { log(2) },
}
);
#!/usr/bin/env perl
use warnings;
use strict;
use App::Benchmark;
benchmark_diag(
2_000_000,
{ sqrt => sub { sqrt(2) },
log => sub { log(2) },
}
);