Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
  • Perl
use Benchmark qw(:hireswallclock timediff timestr);
sub f {};
my $start = Benchmark->new;
f;
print timestr timediff(Benchmark->new, $start);
(time (f))

New implementation...
< >
programming-idioms.org