Re: Refresh display in Perl

Or... skip the system call altogether and use some ascii escape codes :) Assuming you're using a terminal that supports it:

perl -le 'print "\e[2J\e[H", `who` and sleep 2 while 1'
[download]

If the above content is missing any vital points or you feel that any of the information is misleading, incorrect or irrelevant, please feel free to downvote the post. At the same time, please reply to this node or /msg me to inform me as to what is wrong with the post, so that I may update the node to the best of my ability.

Comment on Re: Refresh display in Perl Download Code

Replies are listed 'Best First'.
Re: Re: Refresh display in Perl by sauoq (Abbot) on Jul 30, 2003 at 21:31 UTC
Or... bring back `clear` to make it slightly more portable and save some keystrokes. :-) perl -e 'print `clear`,`who` and sleep 2 while 1' [download] -sauoq "My two cents aren't worth a dime.";	[reply] [d/l]
Re^3: Refresh display in Perl by Coruscate (Sexton) on Jul 30, 2003 at 21:51 UTC
<silly childplay> OR... make it longer to support those poor win32 users (well, assuming they might have installed a program called 'who' lol): perl -le 'print $^O =~ /Win32/ ? `clear;who` : `cls;who` and sleep 2 w +hile 1' [download] </silly childplay> If the above content is missing any vital points or you feel that any of the information is misleading, incorrect or irrelevant, please feel free to downvote the post. At the same time, please reply to this node or /msg me to inform me as to what is wrong with the post, so that I may update the node to the best of my ability.	[reply] [d/l]