Dotaz: carriage return

[Jiri Tomasek]

Zdravim, mam takovy zvlastni problem - co presne dela carriage return \r?

Vzdycky jsem si myslel, ze pokud je nekde uvnitr textu tento znak, pozice se posune na zacatek aktualniho radku a pote se prepisuje jeho stavajici obsah. Tedy tohle:

text: abcdef\rghi
vysledek: rghief

Ale ted jsem tento znak potreboval v perl programu. Potrebuji vypsat nejaky radek, za 10 sekund ho prepsat necim jinym atd. \r zpusobuje, ze se mi nevypisuje vubec nic. Jakmile ho odstranim, tak je to OK, az na to, ze se radky neprepisuji...

Tzn. abych to shrnul:
Co znamena \r?
Jak lze v perlovem programu stale prepisovat tentyz radek (a uvital bych i to, kdyby z toho puvodniho nic nezbylo, ani kdyby byl delsi nez ten, ktery ho prepisuje - tj. napr. ho jeste predtim vymazat)?

Uprimne diky...

Odpovědi

[zabza]

Mně to funguje

[ivok@zero ~]$ perl -e 'print "abcd\r123\rAB\n"' AB3d

[zabza]

pardon

[ivok@zero ~]$ perl -e 'print "abcd\r123\rAB\n"'
AB3d

A dělá to to, že nejdřív vytiskne "abcd", pak přes to "123" a pak přes to "AB"...

Jestli vám něco nefunguje, musíte pastnout příslušnou část kódu.

[zabza]

Aha, pardon, už to chápu, o co vám jde... nikde se nepíše, že by \r cokoliv smazal!

Chardonnay 2003 z Colchagua Valley funguje a já už neumím číst

[Michal Marek (twofish)]

\r dělá to co má, co pozoruješ je nejspíš bufferování stdout:

#!/usr/bin/perl -w

use IO::Handle;

STDOUT->autoflush(1);
print "abcdef";
sleep 1;
print "\rghi";
sleep 1;
print "\n";

[Jiri Tomasek]

Dik. To je hezky Uz kdysi jsem mel podobne problemy, ale to jsem nevedel, ze se STDOUT takhle bufferuje a tak jsem nevedel cim to bylo...

Btw jak se autoflush nastavuje v Cecku?

[Michal Marek (twofish)]

Viz setvbuf(3).