Perl module to print a progress bar

 This is the CPAN Perl module Term::ProgressBar.
 .
 This module displays progress bar for things that take a while.
 It looks like:
 .
  50% [===== ]
 .
 and is as long as the terminal. Linear estimation of the time left
 for the process to run is available.