]> i-scream Git - www.i-scream.org.git/blobdiff - cgi-bin/logviewer.cgi
Remove old CGI's for logging downloads.
[www.i-scream.org.git] / cgi-bin / logviewer.cgi
diff --git a/cgi-bin/logviewer.cgi b/cgi-bin/logviewer.cgi
deleted file mode 100755 (executable)
index 3de416e..0000000
+++ /dev/null
@@ -1,33 +0,0 @@
-#!/usr/bin/perl -w
-
-
-#------------------------------------------------------------
-# logviewer.cgi
-# 
-# i-scream download log viewer
-# Copyright Paul Mutton, 2001.
-#------------------------------------------------------------
-
-print "Content-type: text/html\n\n";
-
-print '<html><body><table border="1">';
-
-$download_count = 0;
-
-open(FILE, "<download_log");
-while($line = <FILE>) {
-    @row = split(/\|/, $line);
-    print <<EOT;
- <tr>
-  <td>$row[0]</td>
-  <td>$row[1]</td>
-  <td>$row[2]</td>
-  <td>$row[3]</td>
-  <td>$row[4]</td>
-  <td>$row[5]</td>
- </tr>
-EOT
-    $download_count++;
-}
-
-print "</table>Download count: $download_count</body></html>";
\ No newline at end of file