That doesn't work because \b will bring the "cursor" back, and not delete characters. So what you want is
$| = 1; #Autoflush my $text = "Test"; print $text; sleep 2; print "\b \b" x length($text); print "OK"; In a message dated 2/23/2004 11:44:35 AM Eastern Standard Time, [EMAIL PROTECTED] writes: $| = 1; #Autoflush my $text = "Test"; print $text; sleep 2; print "\b" x length($text); print "OK"; -Will ----------------------------------- Handy Yet Cryptic Code. Just to Look Cool to Look at and try to decipher without running it. Windows perl -e "printf qq.%3i\x20\x3d\x20\x27%c\x27\x09.,$_,$_ for 0x20..0x7e" Unix perl -e 'printf qq.%3i\x20\x3d\x20\x27%c\x27%7c.,$_,$_,0x20 for 0x20..0x7e'