The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Acme::ProgressBar -- a simple progress bar for the patient

SYNOPSIS

 use Acme::ProgressBar;
 progress { do_something_slow };

DESCRIPTION

Acme::ProgressBar provides a simple solution designed to provide accurate countdowns. No progress bar object needs to be created, and all the calculation of progress through total time required is handled by the module itself.

FUNCTIONS

progress

 progress { unlink $_ for <*> };
 progress { while (<>) { $ua->get($_) } };
 progress { sleep 5; }

There is only one function exported by default, progress. This function takes a coderef as its lone argument. It will execute this code and display a simple progress bar indicating the time required for ten iterations through the code.

TODO

  • allow other divisions of time (other than ten)

AUTHOR

Ricardo SIGNES <rjbs@cpan.org>

Thanks to Steve Lidie for pointing out a stupid error in 1.001: I couldn't count to ten, and he could.

COPYRIGHT

Copyright (C) 2004, Ricardo SIGNES. Available under the same terms as Perl itself.