Benchmark::ProgressBar(3pm)

Benchmark::ProgressBar3pm

Display progress bar while you wait for your benchmark

Usage

  use Benchmark::ProgressBar qw(cmpthese);
  cmpthese(10_000, {
    a => sub { ... },
    b => sub { ... },
  } );

Overview

This is a VERY crude combination of Benchmark.pm and Term::ProgressBar. Basically I got sick of waiting for my benchmarks to finish up without knowing an ETA.

You can use it as a drop-in replacement for Benchmark.pm, but the only functions that would display a progress bar are the ones listed here: cmpthese, timethese, and timeit.

This is achieved via crude (a VERY crude) re-definition of Benchmark.pm's subrountines, so you shouldn't be mixing it with Benchmark.pm (I don't know why you would)

It does the job for me, YMMV. Patches are welcome.

Releases

8 releases since Debian 6.0 (Squeeze); the text changed 2 times.

  1. 6.0–9
  2. 10–11
  3. 12–13

Author

Copyright (c) 2008 Daisuke Maki "[email protected]"

License

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html

From libbenchmark-progressbar-perl 0.00001-3 in Debian 13 (Trixie). Parsed by carta from the page's man source.