Re: wget style progress bar

Doesn't display anything for the longuest time because STDOUT is not being flushed. Setting STDOUT to outflush or adding a call to flush (defined below) after the print does the trick.

sub flush {
   my $h = select($_[0]); my $a=$|; $|=1; $|=$a; select($h);
}
[download]

Comment on Re: wget style progress bar Download Code

Replies are listed 'Best First'.
Re^2: wget style progress bar by tachyon (Chancellor) on Oct 06, 2004 at 02:57 UTC
`$\|++ ;#)`	[reply] [d/l]