Opened by LE at 2009-11-09 13:55
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
probier mal folgendes:
das sollte ein ansatz sein, mit dem du das hinkriegst.
das \r sorgt für einen carriage return ohne zeilenvorschub (im prinzip wie bei einer schreibmaschine) und überschreibt die vorherige zeile.
um zeit zu stoppen, kannst du einfach die startzeit mit time() speichern und dann jeweils von der aktuellen zeit abziehen. für kleinere auflösungen als sekunden nutze
Time::HiRes
Code (perl): (dl
)
1 2 3 4 5 6
$| = 1; # flush stdout for (0 .. 23) { printf "%3d\r", $_; sleep 1; } print "\n";
das sollte ein ansatz sein, mit dem du das hinkriegst.
das \r sorgt für einen carriage return ohne zeilenvorschub (im prinzip wie bei einer schreibmaschine) und überschreibt die vorherige zeile.
um zeit zu stoppen, kannst du einfach die startzeit mit time() speichern und dann jeweils von der aktuellen zeit abziehen. für kleinere auflösungen als sekunden nutze
Time::HiRes
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem