CGI's werden gespeichert nicht ausgeführt


G

GH@NDI

hi!

ich als kleiner Perl newbie hab da mal ein problem...

mein erster kleiner selbstgecodeter counter tut nicht ganz so wie er sollte...er zählt zwar beim aufrufen hoch, allerdings gibt er nicht die anzahl der aufrufe aus, sondern sendet diese als datei an den browser und der will dann die datei speichern!

wenn ich die datei speicher und dann öffne steht da nur die zahl der aufrufe drin...allerdings sollte er doch die counts auf der seite anzeigen...komische sache...

hier mal der code, falls das hilft
Code:
#!/usr/bin/perl

print "content type: text/html\n\n";

open(COUNT, "<counter.txt") || die "datei nicht gefunden";
$countup = <COUNT>;
close(COUNT);

open(COUNT, ">counter.txt") || die "datei nicht gefunden";
$countup++;
print COUNT "$countup";
close(COUNT);
print "$countup";
danke im vorraus,
GH@NDI
 

Arne Buchwald

Erfahrenes Mitglied
Hallo,

lass mal das erste Open weg, dann sollte es funktionieren:

Code:
#!/usr/bin/perl

print "content type: text/html\n\n";

open(FH, ">counter.txt") || die "Datei nicht gefunden";
$Count = <FH>;
$Count++;
print COUNT $Count;
close(FH);

print $Count;