Perl extension to display a progress bar