CGI counter

Artikler, Tips og tricks
→	CSS (8 Artikler)
→	HTML (11 Artikler)
→	JS (7 Artikler)
→	PERL (1 Artikler)
→	PHP (3 Artikler)
→	APACHE (8 Artikler)
→	COMPUTER (2 Artikler)
→	LINUX (2 Artikler)
→	MICROSOFT (7 Artikler)
→	SIKKERHED (6 Artikler)
→	WEBDESIGN (5 Artikler)
→	DIVERSE (8 Artikler)

Tutorials
→	CSS (18 Lektioner)
→	HTML (15 Lektioner)
→	JS (8 Lektioner)
→	PERL (12 Lektioner)
→	PHP (6 Lektioner)
→	SQL (8 Lektioner)
→	SSI (7 Lektioner)
→	XHTML (5 Lektioner)

Tools
→	.htaccess generator
→	Iframe generator
→	"Krypter" din e-mail
→	Meta-tag generator
→	Webcolor
→	.... flere

Service
→	Software
→	Links
→	Dokumentation
→	Nyhedsgrupper
→	Downloads
→	Virus info
→	Seneste IT nyheder
→	.... flere
→	Alt om NETeXplorer

Google

Advertising

HOME -> PERL_ARTIKLER -> 01-perlcounter	Onsdag, 19. November 2008

	powered by FreeFind

Offentliggjort 2003 - Opdateret n/a

CGI counter

Har du brug for en lille simpel cgi tæller skrevet i perl? Så er den her!

Opsætning:

Kopier nedenfor stående kode til et tomt dokument og gem det som counter.cgi. Ret evt. stien til hits.txt.
Upload counter.cgi samt hits.txt (hits.txt er blot en tom tekst fil som du selv opretter).
Chmod hits.txt 666.
Chmod counter.cgi 755.

#!/usr/bin/perl -w
# Made by NETeXplorer.dk

$log="hits.txt";

open (FILE,$log);
$counter=<FILE>;
close(FILE);
$counter++;
open (WRITE,">$log");
print WRITE "$counter";
close(WRITE);
print "Content-type: text/html\n\n";
print "document.write($counter)";

I dit html dokument indsætter du følgende kode: (Ret evt. stien til counter.cgi).

<table style="border: 1px solid #000000; border-collapse: collapse;"><tr><td style="text-align: center; background-color: #6495ed; border-bottom: 1px solid #000000;"><b> Hits i alt </b></td></tr>
<tr><td style="text-align: center;"><b><script type="text/javascript" src="counter.cgi"></script></b></td></tr>
<tr><td style="text-align: center; font-size: 8px;">Powered by<br /><a style="font-size: 8px;" href="http://www.NETeXplorer.dk">NETeXplorer.dk</a></td></tr></table>