Hallo liebe Leute,
anfangs dachte ich mir "Dumm gelaufen" als zum ersten Mal mein Counter (auf eigenem Server) unerklärlicherweise auf Null zurückgesetzt war. Nachdem inzwischen aber der Counter fast alle zwei Wochen neustartet muß wohl irgendwo der Wurm drin sein.
Der Counter wird via SSI aufgerufen und wöchentlich 300-400 Mal aufgerufen.
Welche Gründe könnte es geben, daß sich untenstehendes Skript den Counter selbst neustartet? Kann es durch den gleichzeitigen Aufruf mehrerer User kommen? Und wenn ja: Wie kann ich das vermeiden?
<schnipp>
#!/usr/bin/perl
Festlegen von Variablen und Datenquellen
$counterfile = "counter.txt";
$neu = "0";
Einlesen der Linkdaten aus Datenbank-Datei
open(COUNTER, "<$counterfile") die "Datei nicht gefunden\n";
while(<COUNTER>)
{
push(@counter,$_);
}
close(COUNTER);
$neu = $counter[0] += "1";
# Schreiben des neuen Zählerstandes
open(COUNTER, ">$counterfile") die "Datei nicht gefunden\n";
print COUNTER "$neu";
close(COUNTER);
print "Content-type: text/html\n\n";
print "$neu Zugriffe seit 20. Juni 1999";
</schnipp>
Vielen Dank für Eure Hilfe.
Grüße aus Bayreuth
Julian