[ overflow @ 18.08.2002. 11:47 ] @
Evo ga kod mog counter-a ... iznenada se brojac sa 34xx spao na 14xx ... zna li neko zasto? Code: #!/usr/bin/perl $data = 'data.log'; open (F, $data); seek (F,0,0); $br = <F>; close (f); $br++; open (F,">$data"); seek (F,0,0); print F "$br"; close (f); print "Content-type:text/html\n\n"; print <<EndHdr; <font face="Verdana, Arial, Helvetica, sans-serif" color="#003366" size="2">Number of visitors: <b>$br</b><br>since 26.03.2002.</font> EndHdr CHMOD data.log = 644 count.cgi = 755 |