Re: Dynamically overwriting a line of text on stdout console

Check to see if $\ is defined as "\n". It is undefined by default. Perl print will add on a $\ at the end of each print's arguments, as well as a $, between each argument.

If it's defined because you need it, you can localize $\ for this bit.

{
    local $\;
    print 'somestuff';
    print "\rOVERWRITE\n";
}
[download]

After Compline,
Zaxo

Comment on Re: Dynamically overwriting a line of text on stdout console Download Code

Replies are listed 'Best First'.
Re^2: Dynamically overwriting a line of text on stdout console by freddo411 (Chaplain) on Jul 22, 2004 at 22:52 UTC
This in fact works: `$\ = undef ; print 'somestuff'; print "\rOVERWRITE\n";` [download] But I don't understand, because: `print "Text"; print " MoreText\n";` [download] Does not get printed as: `Text MoreText` [download] as $\ being "\n" would seem to imply. I am using version 5.005. ------------------------------------- Nothing is too wonderful to be true -- Michael Faraday	[reply] [d/l] [select]