Thread Rückwärts-Counter (10 answers)
Opened by FlorianL at 2007-07-10 16:03

FlorianL
 2007-07-10 16:03
#78331 #78331
User since
2007-05-18
142 Artikel
BenutzerIn
[default_avatar]
Hallo zusammen :)

ich möchte in meiner perl app gerne nen kleinen counter einbauen der einfach nur rückwärts zählt und es halt anzeigt...

so schauts im moment aus:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

#!/usr/bin/perl

use strict;
use warnings;

my $count = 10;

while ($count--) {
        system("clear");
        print ("$count\n");
        sleep(1);
        if ($count == 1) {
               
 print "Boom\n";
               
 exit 0;
        }
}


nunja... das klappt zwar, aber ich würde sehr gern ohne das clear auskommen um die werte an selber stelle zu ersetzen, hat jemand ne idee wie ich das machen kann? kann so keine dauer-lösung sein, weil natürlich hab ich neben dem count noch anderen output den ich nicht clearen will :)

View full thread Rückwärts-Counter