Help for this page
open(LOG, "+>Test.log"); for($x=0;$x<=100;$x++){ ... print LOG "\rProgress...Done!\n"; close LOG; $wait=<>;
"Progress...Done!"
"Progress...0% Progress...1% ... ... Progress...100% Progress...Done!"