23 files changed, 0 insertions, 275 deletions
diff --git a/t/lib/abbrev.t b/t/lib/abbrev.t
index fb5a9841eb..fb5a9841eb 100644..100755
--- a/t/lib/abbrev.t
+++ b/t/lib/abbrev.t
diff --git a/t/lib/autoloader.t b/t/lib/autoloader.t
index b1622a8ae2..b1622a8ae2 100644..100755
--- a/t/lib/autoloader.t
+++ b/t/lib/autoloader.t
diff --git a/t/lib/basename.t b/t/lib/basename.t
index 56b1f7f211..56b1f7f211 100644..100755
--- a/t/lib/basename.t
+++ b/t/lib/basename.t
diff --git a/t/lib/checktree.t b/t/lib/checktree.t
index b5426ca261..b5426ca261 100644..100755
--- a/t/lib/checktree.t
+++ b/t/lib/checktree.t
diff --git a/t/lib/complex.t b/t/lib/complex.t
index 1ffd7d5447..1ffd7d5447 100644..100755
--- a/t/lib/complex.t
+++ b/t/lib/complex.t
diff --git a/t/lib/env.t b/t/lib/env.t
index 5a8220778a..5a8220778a 100644..100755
--- a/t/lib/env.t
+++ b/t/lib/env.t
diff --git a/t/lib/fatal.t b/t/lib/fatal.t
index fe2f63d072..fe2f63d072 100644..100755
--- a/t/lib/fatal.t
+++ b/t/lib/fatal.t
diff --git a/t/lib/filecache.t b/t/lib/filecache.t
index a97fdd532c..a97fdd532c 100644..100755
--- a/t/lib/filecache.t
+++ b/t/lib/filecache.t
diff --git a/t/lib/filecopy.t b/t/lib/filecopy.t
index 4a5d1d756a..4a5d1d756a 100644..100755
--- a/t/lib/filecopy.t
+++ b/t/lib/filecopy.t
diff --git a/t/lib/filefind.t b/t/lib/filefind.t
index 21e29a2d7f..21e29a2d7f 100644..100755
--- a/t/lib/filefind.t
+++ b/t/lib/filefind.t
diff --git a/t/lib/filepath.t b/t/lib/filepath.t
index c014f741d6..c014f741d6 100644..100755
--- a/t/lib/filepath.t
+++ b/t/lib/filepath.t
diff --git a/t/lib/findbin.t b/t/lib/findbin.t
index 8d5347cdb7..8d5347cdb7 100644..100755
--- a/t/lib/findbin.t
+++ b/t/lib/findbin.t
diff --git a/t/lib/getopt.t b/t/lib/getopt.t
index ec2ea49059..ec2ea49059 100644..100755
--- a/t/lib/getopt.t
+++ b/t/lib/getopt.t
diff --git a/t/lib/hostname.t b/t/lib/hostname.t
index e4ac36521c..e4ac36521c 100644..100755
--- a/t/lib/hostname.t
+++ b/t/lib/hostname.t
diff --git a/t/lib/parsewords.t b/t/lib/parsewords.t
index 47a75881dc..47a75881dc 100644..100755
--- a/t/lib/parsewords.t
+++ b/t/lib/parsewords.t
diff --git a/t/lib/searchdict.t b/t/lib/searchdict.t
index 69329d65c1..69329d65c1 100644..100755
--- a/t/lib/searchdict.t
+++ b/t/lib/searchdict.t
diff --git a/t/lib/selectsaver.t b/t/lib/selectsaver.t
index 3b58d709ab..3b58d709ab 100644..100755
--- a/t/lib/selectsaver.t
+++ b/t/lib/selectsaver.t
diff --git a/t/lib/symbol.t b/t/lib/symbol.t
index 03449a3ed7..03449a3ed7 100644..100755
--- a/t/lib/symbol.t
+++ b/t/lib/symbol.t
diff --git a/t/lib/texttabs.t b/t/lib/texttabs.t
index ea9012c652..ea9012c652 100644..100755
--- a/t/lib/texttabs.t
+++ b/t/lib/texttabs.t
diff --git a/t/lib/textwrap.t b/t/lib/textwrap.t
index 9c8d1b4975..9c8d1b4975 100644..100755
--- a/t/lib/textwrap.t
+++ b/t/lib/textwrap.t
diff --git a/t/lib/timelocal.t b/t/lib/timelocal.t
index adc1b1b061..adc1b1b061 100644..100755
--- a/t/lib/timelocal.t
+++ b/t/lib/timelocal.t
diff --git a/x2p/a2p.man b/x2p/a2p.man
deleted file mode 100644
index f74e596ed2..0000000000
--- a/x2p/a2p.man
+++ /dev/null
@@ -1,183 +0,0 @@
-.rn '' }`
-''' $RCSfile: a2p.man,v $$Revision: 4.1 $$Date: 92/08/07 18:29:10 $
-''' 
-''' $Log:	a2p.man,v $
-.de Sh
-.br
-.ne 5
-.PP
-\fB\\$1\fR
-.PP
-..
-.de Sp
-.if t .sp .5v
-.if n .sp
-..
-.de Ip
-.br
-.ie \\n.$>=3 .ne \\$3
-.el .ne 3
-.IP "\\$1" \\$2
-..
-'''
-'''     Set up \*(-- to give an unbreakable dash;
-'''     string Tr holds user defined translation string.
-'''     Bell System Logo is used as a dummy character.
-'''
-.tr \(*W-|\(bv\*(Tr
-.ie n \{\
-.ds -- \(*W-
-.if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
-.if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch
-.ds L" ""
-.ds R" ""
-.ds L' '
-.ds R' '
-'br\}
-.el\{\
-.ds -- \(em\|
-.tr \*(Tr
-.ds L" ``
-.ds R" ''
-.ds L' `
-.ds R' '
-'br\}
-.TH A2P 1 LOCAL
-.SH NAME
-a2p - Awk to Perl translator
-.SH SYNOPSIS
-.B a2p [options] filename
-.SH DESCRIPTION
-.I A2p
-takes an awk script specified on the command line (or from standard input)
-and produces a comparable
-.I perl
-script on the standard output.
-.Sh "Options"
-Options include:
-.TP 5
-.B \-D<number>
-sets debugging flags.
-.TP 5
-.B \-F<character>
-tells a2p that this awk script is always invoked with this -F switch.
-.TP 5
-.B \-n<fieldlist>
-specifies the names of the input fields if input does not have to be split into
-an array.
-If you were translating an awk script that processes the password file, you
-might say:
-.sp
-	a2p -7 -nlogin.password.uid.gid.gcos.shell.home
-.sp
-Any delimiter can be used to separate the field names.
-.TP 5
-.B \-<number>
-causes a2p to assume that input will always have that many fields.
-.Sh "Considerations"
-A2p cannot do as good a job translating as a human would, but it usually
-does pretty well.
-There are some areas where you may want to examine the perl script produced
-and tweak it some.
-Here are some of them, in no particular order.
-.PP
-There is an awk idiom of putting int() around a string expression to force
-numeric interpretation, even though the argument is always integer anyway.
-This is generally unneeded in perl, but a2p can't tell if the argument
-is always going to be integer, so it leaves it in.
-You may wish to remove it.
-.PP
-Perl differentiates numeric comparison from string comparison.
-Awk has one operator for both that decides at run time which comparison
-to do.
-A2p does not try to do a complete job of awk emulation at this point.
-Instead it guesses which one you want.
-It's almost always right, but it can be spoofed.
-All such guesses are marked with the comment \*(L"#???\*(R".
-You should go through and check them.
-You might want to run at least once with the \-w switch to perl, which
-will warn you if you use == where you should have used eq.
-.PP
-Perl does not attempt to emulate the behavior of awk in which nonexistent
-array elements spring into existence simply by being referenced.
-If somehow you are relying on this mechanism to create null entries for
-a subsequent for...in, they won't be there in perl.
-.PP
-If a2p makes a split line that assigns to a list of variables that looks
-like (Fld1, Fld2, Fld3...) you may want
-to rerun a2p using the \-n option mentioned above.
-This will let you name the fields throughout the script.
-If it splits to an array instead, the script is probably referring to the number
-of fields somewhere.
-.PP
-The exit statement in awk doesn't necessarily exit; it goes to the END
-block if there is one.
-Awk scripts that do contortions within the END block to bypass the block under
-such circumstances can be simplified by removing the conditional
-in the END block and just exiting directly from the perl script.
-.PP
-Perl has two kinds of array, numerically-indexed and associative.
-Awk arrays are usually translated to associative arrays, but if you happen
-to know that the index is always going to be numeric you could change
-the {...} to [...].
-Iteration over an associative array is done using the keys() function, but
-iteration over a numeric array is NOT.
-You might need to modify any loop that is iterating over the array in question.
-.PP
-Awk starts by assuming OFMT has the value %.6g.
-Perl starts by assuming its equivalent, $#, to have the value %.20g.
-You'll want to set $# explicitly if you use the default value of OFMT.
-.PP
-Near the top of the line loop will be the split operation that is implicit in
-the awk script.
-There are times when you can move this down past some conditionals that
-test the entire record so that the split is not done as often.
-.PP
-For aesthetic reasons you may wish to change the array base $[ from 1 back
-to perl's default of 0, but remember to change all array subscripts AND
-all substr() and index() operations to match.
-.PP
-Cute comments that say "# Here is a workaround because awk is dumb" are passed
-through unmodified.
-.PP
-Awk scripts are often embedded in a shell script that pipes stuff into and
-out of awk.
-Often the shell script wrapper can be incorporated into the perl script, since
-perl can start up pipes into and out of itself, and can do other things that
-awk can't do by itself.
-.PP
-Scripts that refer to the special variables RSTART and RLENGTH can often
-be simplified by referring to the variables $`, $& and $', as long as they
-are within the scope of the pattern match that sets them.
-.PP
-The produced perl script may have subroutines defined to deal with awk's
-semantics regarding getline and print.
-Since a2p usually picks correctness over efficiency.
-it is almost always possible to rewrite such code to be more efficient by
-discarding the semantic sugar.
-.PP
-For efficiency, you may wish to remove the keyword from any return statement
-that is the last statement executed in a subroutine.
-A2p catches the most common case, but doesn't analyze embedded blocks for
-subtler cases.
-.PP
-ARGV[0] translates to $ARGV0, but ARGV[n] translates to $ARGV[$n].
-A loop that tries to iterate over ARGV[0] won't find it.
-.SH ENVIRONMENT
-A2p uses no environment variables.
-.SH AUTHOR
-Larry Wall <lwall@jpl-devvax.Jpl.Nasa.Gov>
-.SH FILES
-.SH SEE ALSO
-perl	The perl compiler/interpreter
-.br
-s2p	sed to perl translator
-.SH DIAGNOSTICS
-.SH BUGS
-It would be possible to emulate awk's behavior in selecting string versus
-numeric operations at run time by inspection of the operands, but it would
-be gross and inefficient.
-Besides, a2p almost always guesses right.
-.PP
-Storage for the awk syntax tree is currently static, and can run out.
-.rn }` ''
diff --git a/x2p/s2p.man b/x2p/s2p.man
deleted file mode 100644
index ae4611613f..0000000000
--- a/x2p/s2p.man
+++ /dev/null
@@ -1,92 +0,0 @@
-.rn '' }`
-''' $RCSfile: s2p.man,v $$Revision: 4.1 $$Date: 92/08/07 18:29:24 $
-''' 
-''' $Log:	s2p.man,v $
-.de Sh
-.br
-.ne 5
-.PP
-\fB\\$1\fR
-.PP
-..
-.de Sp
-.if t .sp .5v
-.if n .sp
-..
-.de Ip
-.br
-.ie \\n.$>=3 .ne \\$3
-.el .ne 3
-.IP "\\$1" \\$2
-..
-'''
-'''     Set up \*(-- to give an unbreakable dash;
-'''     string Tr holds user defined translation string.
-'''     Bell System Logo is used as a dummy character.
-'''
-.tr \(*W-|\(bv\*(Tr
-.ie n \{\
-.ds -- \(*W-
-.if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
-.if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch
-.ds L" ""
-.ds R" ""
-.ds L' '
-.ds R' '
-'br\}
-.el\{\
-.ds -- \(em\|
-.tr \*(Tr
-.ds L" ``
-.ds R" ''
-.ds L' `
-.ds R' '
-'br\}
-.TH S2P 1 NEW
-.SH NAME
-s2p - Sed to Perl translator
-.SH SYNOPSIS
-.B s2p [options] filename
-.SH DESCRIPTION
-.I S2p
-takes a sed script specified on the command line (or from standard input)
-and produces a comparable
-.I perl
-script on the standard output.
-.Sh "Options"
-Options include:
-.TP 5
-.B \-D<number>
-sets debugging flags.
-.TP 5
-.B \-n
-specifies that this sed script was always invoked with a sed -n.
-Otherwise a switch parser is prepended to the front of the script.
-.TP 5
-.B \-p
-specifies that this sed script was never invoked with a sed -n.
-Otherwise a switch parser is prepended to the front of the script.
-.Sh "Considerations"
-The perl script produced looks very sed-ish, and there may very well be
-better ways to express what you want to do in perl.
-For instance, s2p does not make any use of the split operator, but you might
-want to.
-.PP
-The perl script you end up with may be either faster or slower than the original
-sed script.
-If you're only interested in speed you'll just have to try it both ways.
-Of course, if you want to do something sed doesn't do, you have no choice.
-It's often possible to speed up the perl script by various methods, such
-as deleting all references to $\e and chop.
-.SH ENVIRONMENT
-S2p uses no environment variables.
-.SH AUTHOR
-Larry Wall <lwall@jpl-devvax.Jpl.Nasa.Gov>
-.SH FILES
-.SH SEE ALSO
-perl	The perl compiler/interpreter
-.br
-a2p	awk to perl translator
-.SH DIAGNOSTICS
-.SH BUGS
-.rn }` ''