A quick search for progressbars on http://search.cpan.org turned up several modules that you could use, such as Tk::ProgressBar and Term::ProgressBar.

TStanley
--------
"Suppose you were an idiot... And suppose you were a
member of Congress... But I repeat myself." -- Mark Twain