Move most .pl scripts to names without extensions. Drop ssize.pl, which I

[bin.git] / ssize.pl

diff --git a/ssize.pl b/ssize.pl
deleted file mode 100755 (executable)
index 2278255..0000000
--- a/ssize.pl
+++ /dev/null
@@ -1,23 +0,0 @@
-#! /usr/bin/perl -w
-use diagnostics;
-use strict;
-
-my $body = 0;
-my $filename = shift;
-
-while (<>)
-{
-       if (/^<BODY/)
-       {
-               $body = 1;
-               $_ = <>;
-               $_ = <>;
-               print "<!--#include virtual=\"$filename.header.ssi\" -->\n";
-       }
-       next unless $body;
-       last if /^<\/BODY/;
-       print;
-}
-
-print "<!--#include virtual=\"footer.ssi\" -->\n";
-