Remove the obsolete text.pl.
authorSteinar H. Gunderson <sgunderson@bigfoot.com>
Mon, 24 Nov 2014 20:24:38 +0000 (21:24 +0100)
committerSteinar H. Gunderson <sgunderson@bigfoot.com>
Mon, 24 Nov 2014 20:24:38 +0000 (21:24 +0100)
www/text.pl [deleted file]

diff --git a/www/text.pl b/www/text.pl
deleted file mode 100755 (executable)
index 9319e56..0000000
+++ /dev/null
@@ -1,16 +0,0 @@
-#! /usr/bin/perl
-use CGI;
-print CGI->header(-type=>'text/plain', -refresh=>'5; http://analysis.sesse.net/text.pl', -expires=>'+5s');
-# print CGI->header(-type=>'text/plain');
-open(my $fh, "tail -100 /home/remoteglot/log.txt |");
-my @lines = ();
-while (<$fh>) {
-       s/.*H.*2J.*Analysis/Analysis/;
-       if (/^Analysis/) { @lines = (); }
-       push @lines, $_;
-}
-print join('', @lines);
-#system("tail -100 /home/remoteglot/log.txt | grep -A 8 Analysis | sed 's/^.*Analysis/Analysis/'");
-if (-r "/srv/analysis.sesse.net/complete_analysis.txt") {
-#      system("cat /srv/analysis.sesse.net/complete_analysis.txt");
-}