Shell Programming and Scripting

$number_clients++;

print("Creating client $number_clients\r");


I have been using the above to increment on the screen as the script increments throughout a while loop. What I would like to know is what is the trick to keep the last one on the screen without printing it again?

Ie

...Script running

Creating client 500

End of script

At the moment it runs through and just removes the last one from the screen....

Thanks in anticipation, I am sure it is a simple answer...

I haven't seem a simple way around the problem (although, it is interesting to note that under Win32 with ActiveState the \r is not a problem although it is under Unix).

How about something like this?

Code:

#!/usr/bin/perl

my $counter = 0;

while ($counter++ <= 1000) {
  print "Counter is $counter";

  # Doing lots of work that takes a while

  print "\r"
};
print "\nDone!\n";

When the creating takes a while the message is still displayed on the line and the carriage return doesn't take place until the work is done and ready for the next iteration.