in reply to Status of progress bar in perl
The CPAN module Smart::Comments may be of use.
The book Perl Best Practices has a section entitled Progress Indicators (Chapter 10 - page 222 in my copy) which may also prove useful.
-- Ken