如何更新Perl命令行应用程序上的进度显示？

I have a little Perl script (On Windows) that checks some files for me as an aid to my day-to-day business. At the moment it prints out something like...I have a little Perl script (On Windows) that c