Log-Auswertung beim OmniHttpd ???

[Rolf Rost]

Hi Erich, probier mal das folgende Script aber bedenke: so ein Logfile kann mitunter ein paar MB'chen groß sein ;-) Rosti

---log.cgi

Logfile omnihttpd auslesen

cgi written by Rosti

ScriptName log.cgi

Path/Logfile no trailing slash

$log_file = "c:/httpd/Logs/Access.log";

Logfile öffnen und auslesen

open (LF, $log_file) &fehler;
my @log_array = <LF>;
close LF;

Logfile anzeigen

print "content-type:text/plain\n\n";
print "---------- OHTTPd LogFile as Plain Text---------------\n";
foreach my $zeile (@log_array){
print "$zeile";
}

sub fehler{
print "content-type:text/html\n\n";
print "<h1>Fehler beim Lesen Logfile</h1>falscher Pfad oder so...";
exit;
}
---eof

PS: Endlich Feierahmd, Pumpe! und Ostern...