perl - リアルタイムで unix への出力を更新する

Question

これはよくあることだと思いますが、Googleで何かを見つけるのに苦労していました...

私は Perl を使用しており、プログラムを UNIX で実行しています。私のプログラムのある時点で、見つかった正規表現の一致数を表す数字を出力しています。とにかく、出力はこのようなものです..

1
2
3
4 
5

等..

かなり長いリストになるので、出力の一番上または一番下に行きたい場合は、大量のスクロールを行う必要があります...

私の質問は、リスト出力をリアルタイムで更新するにはどうすればよいかということです。そのため、リスト出力は1行のままになります。などに変更するように1変更します。23

手伝ってくれてありがとう！

Answer 1

多くのことに依存しますが\r、文字列ではカーソルを行頭に戻す必要があります。

Answer 2

最初に、Perl で出力のバッファリングを解除することを忘れないでください:

$|=1;

次に試してください：

$(tput clear);

端末ウィンドウの上部にカーソルを置きます。

次のように入力してみてください。

tput clear

端末に入力して、画面がクリアされ、カーソルが左上に移動するかどうかを確認します。そうでない場合は、次のように入力してみてください。

clear

画面をクリアし、カーソルを「ホーム」位置に移動します。