Ich habe folgendes Problem: Ich möchte einen textbasierten Counter mit SSI realisieren.
Der Code des Perlscripts (counting.pl) ist folgender:
#!/usr/bin/perl
print "Content-type: text/html\n\n";
print "Hallo vom Counterscript";
$count_file="count.dat";
open(FILE,"<".$count_file);
$anzahl = <FILE>;
close(FILE);
open(FILE,">".$count_file);
$anzahl++;
print FILE $anzahl;
close(FILE);
print $anzahl;
print "\n";
exit(0);
Dazu habe ich eine HTML-Datei (probe.shtml) geschrieben:
<html>
<head>
</head>
<body>
Hallo auf den Webseiten von ... <br>
Sie sehen hier das Dokument <!--#echo var="DOCUMENT_NAME"--> <br>
Letzte Modifikation: <!--#echo var="LAST_MODIFIED"--> <br>
Diese Seite wurde bereits <!--#exec cgi="counting.pl"--> mal besucht.
<br>
Der obige Zähler wurde mit SSI realisiert.
</body>
</html>
Wird die Seite im Browser betrachtet, ergibt sich folgende Ausgabe:
Hallo auf den Webseiten von ...
Sie sehen hier das Dokument probe.shtml
Letzte Modifikation: Thursday, 04-May-2000 10:23:55 MEST
Diese Seite wurde bereits mal besucht.
Der obige Zähler wurde mit SSI realisiert.
-----------------------------------------------------------------------------------------------------
Frage: Warum erhalte ich keine Ausgabe vom Counterskript. Die anderen SSI-Direktiven funktionieren offenbar.
Was mache ich falsch???