summaryrefslogtreecommitdiff
path: root/doc/utils/killtoodeepcontents.pl
diff options
context:
space:
mode:
authorRene Mayrhofer <rene@mayrhofer.eu.org>2007-01-28 21:00:49 +0000
committerRene Mayrhofer <rene@mayrhofer.eu.org>2007-01-28 21:00:49 +0000
commitcd4e20d58fb0d782ba9f7bd4bead4f333d670370 (patch)
tree40dedbc421cf4811b9f70b8a62977fd962b9facd /doc/utils/killtoodeepcontents.pl
parent5c3858b7d7ae271065816bea3a4944b75bc890d1 (diff)
downloadvyos-strongswan-cd4e20d58fb0d782ba9f7bd4bead4f333d670370.tar.gz
vyos-strongswan-cd4e20d58fb0d782ba9f7bd4bead4f333d670370.zip
- New upstream release, now _with_ XAUTH support.
Diffstat (limited to 'doc/utils/killtoodeepcontents.pl')
-rw-r--r--doc/utils/killtoodeepcontents.pl59
1 files changed, 0 insertions, 59 deletions
diff --git a/doc/utils/killtoodeepcontents.pl b/doc/utils/killtoodeepcontents.pl
deleted file mode 100644
index a6fe551d6..000000000
--- a/doc/utils/killtoodeepcontents.pl
+++ /dev/null
@@ -1,59 +0,0 @@
-#!/usr/bin/perl
-
-$toc=0;
-$memo=0;
-
-while(<>) {
- if(0 && /^Status of this Memo/) {
- $memo=1;
- print;
- next;
- }
-
- if(/^Table of Contents/) {
- print ".bp\n";
- $toc=1;
- print;
- next;
- }
-
- if(!$toc && !$memo) {
- print;
- next;
- }
-
- if($toc) {
- if(/^[0-9]*\.[0-9]*\.[0-9]* / ||
-# /^[0-9]*\.[0-9]* / ||
- /^[0-9]*\.[0-9]*\.[0-9]*\.[0-9]* /) {
- next;
- }
-
- if(/^14./) {
- $toc=0;
- }
- if(/^\.bp/) {
- next;
- }
- print;
- }
-
- if($memo) {
- if(/^\.bp/) {
- next;
- }
-
- if(/^Copyright Notice/) {
- print ".fi\n";
- print "This memo provides information for the Internet community. It does\n";
- print "not specify an Internet standard of any kind. Distribution of this\n";
- print "memo is unlimited.\n";
- print "\n.ti 0\n";
-
- print;
-
- $memo=0;
- next;
- }
- }
-}