29 files changed, 0 insertions, 58 deletions
diff --git a/lib/AnyDBM_File.t b/lib/AnyDBM_File.t
index b87d26a2ff..cb9eee9760 100755
--- a/lib/AnyDBM_File.t
+++ b/lib/AnyDBM_File.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: dbm.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:43 $
-
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
diff --git a/lib/importenv.pl b/lib/importenv.pl
index c28ffd054d..0401127f18 100644
--- a/lib/importenv.pl
+++ b/lib/importenv.pl
@@ -1,5 +1,3 @@
-;# $RCSfile: importenv.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:24:02 $
-
 ;# This file, when interpreted, pulls the environment into normal variables.
 ;# Usage:
 ;#	require 'importenv.pl';
diff --git a/lib/stat.pl b/lib/stat.pl
index f7c240a4b3..c6682b9df3 100644
--- a/lib/stat.pl
+++ b/lib/stat.pl
@@ -1,5 +1,3 @@
-;# $RCSfile: stat.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:24:13 $
-
 ;# Usage:
 ;#	require 'stat.pl';
 ;#	@ary = stat(foo);
diff --git a/lib/validate.pl b/lib/validate.pl
index ec4a04b543..c655872333 100644
--- a/lib/validate.pl
+++ b/lib/validate.pl
@@ -1,5 +1,3 @@
-;# $RCSfile: validate.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:24:19 $
-
 ;# The validate routine takes a single multiline string consisting of
 ;# lines containing a filename plus a file test to try on it.  (The
 ;# file test may also be a 'cd', causing subsequent relative filenames
diff --git a/t/base/cond.t b/t/base/cond.t
index 9a57348474..e2ef358f9a 100755
--- a/t/base/cond.t
+++ b/t/base/cond.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: cond.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:02 $
-
 # make sure conditional operators work
 
 print "1..4\n";
diff --git a/t/base/if.t b/t/base/if.t
index 12db7652e4..f093b0d580 100755
--- a/t/base/if.t
+++ b/t/base/if.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: if.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:03 $
-
 print "1..2\n";
 
 # first test to see if we can run the tests.
diff --git a/t/base/pat.t b/t/base/pat.t
index c689f4552d..9e3f6151e0 100755
--- a/t/base/pat.t
+++ b/t/base/pat.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: pat.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:05 $
-
 print "1..2\n";
 
 # first test to see if we can run the tests.
diff --git a/t/base/term.t b/t/base/term.t
index 2d3fe5a5e1..83a32aa178 100755
--- a/t/base/term.t
+++ b/t/base/term.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: term.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:07 $
-
 BEGIN {
     chdir 't' if -d 't';
 }
diff --git a/t/cmd/elsif.t b/t/cmd/elsif.t
index 7eace161e0..536358c9a1 100755
--- a/t/cmd/elsif.t
+++ b/t/cmd/elsif.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: elsif.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:08 $
-
 sub foo {
     if ($_[0] == 1) {
 	1;
diff --git a/t/cmd/mod.t b/t/cmd/mod.t
index d427d78e4c..07617f55b0 100755
--- a/t/cmd/mod.t
+++ b/t/cmd/mod.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: mod.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:11 $
-
 print "1..13\n";
 
 print "ok 1\n" if 1;
diff --git a/t/cmd/subval.t b/t/cmd/subval.t
index 67a4ebfdf3..0999ff9891 100755
--- a/t/cmd/subval.t
+++ b/t/cmd/subval.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: subval.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:13 $
-
 sub foo1 {
     'true1';
     if ($_[0]) { 'true2'; }
diff --git a/t/cmd/switch.t b/t/cmd/switch.t
index faa5de470f..82f417ff4b 100755
--- a/t/cmd/switch.t
+++ b/t/cmd/switch.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: switch.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:14 $
-
 print "1..18\n";
 
 sub foo1 {
diff --git a/t/comp/cmdopt.t b/t/comp/cmdopt.t
index 3f701a456a..f72ddb30ab 100755
--- a/t/comp/cmdopt.t
+++ b/t/comp/cmdopt.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: cmdopt.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:17 $
-
 print "1..44\n";
 
 # test the optimization of constants
diff --git a/t/comp/cpp.t b/t/comp/cpp.t
index 48250c23a9..80add8130f 100755
--- a/t/comp/cpp.t
+++ b/t/comp/cpp.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: cpp.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:18 $
-
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
diff --git a/t/comp/decl.t b/t/comp/decl.t
index 32b8509df7..a4b898c714 100755
--- a/t/comp/decl.t
+++ b/t/comp/decl.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: decl.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:19 $
-
 # check to see if subroutine declarations work everwhere
 
 sub one {
diff --git a/t/io/inplace.t b/t/io/inplace.t
index a97add566c..9b5be2a941 100755
--- a/t/io/inplace.t
+++ b/t/io/inplace.t
@@ -2,8 +2,6 @@
 
 $^I = $^O eq 'VMS' ? '_bak' : '.bak';
 
-# $RCSfile: inplace.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:29 $
-
 print "1..2\n";
 
 @ARGV = ('.a','.b','.c');
diff --git a/t/io/read.t b/t/io/read.t
index 6d590ff688..2665ecb921 100755
--- a/t/io/read.t
+++ b/t/io/read.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile$
-
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
diff --git a/t/io/tell.t b/t/io/tell.t
index 9527876168..4881d4340f 100755
--- a/t/io/tell.t
+++ b/t/io/tell.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: tell.t,v $$Revision$$Date$
-
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
diff --git a/t/op/append.t b/t/op/append.t
index 9d6c1d55a4..21af62c38e 100755
--- a/t/op/append.t
+++ b/t/op/append.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: append.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:36 $
-
 print "1..13\n";
 
 $a = 'ab' . 'c';	# compile time
diff --git a/t/op/auto.t b/t/op/auto.t
index 2eb0097650..818db4f831 100755
--- a/t/op/auto.t
+++ b/t/op/auto.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: auto.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:39 $
-
 print "1..37\n";
 
 $x = 10000;
diff --git a/t/op/cond.t b/t/op/cond.t
index 427efb4887..0a0d1e1735 100755
--- a/t/op/cond.t
+++ b/t/op/cond.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: cond.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:41 $
-
 print "1..4\n";
 
 print 1 ? "ok 1\n" : "not ok 1\n";	# compile time
diff --git a/t/op/do.t b/t/op/do.t
index b611d0d1db..9775331618 100755
--- a/t/op/do.t
+++ b/t/op/do.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: do.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:45 $
-
 sub foo1
 {
     ok($_[0]);
diff --git a/t/op/flip.t b/t/op/flip.t
index 70666ac658..5a4e8d0038 100755
--- a/t/op/flip.t
+++ b/t/op/flip.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: flip.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:52 $
-
 chdir 't' if -d 't';
 
 print "1..15\n";
diff --git a/t/op/goto_xs.t b/t/op/goto_xs.t
index 2c95139b14..6505889964 100755
--- a/t/op/goto_xs.t
+++ b/t/op/goto_xs.t
@@ -1,8 +1,6 @@
 #!./perl
 # tests for "goto &sub"-ing into XSUBs
 
-# $RCSfile$$Revision$$Date$
-
 # Note: This only tests things that should *work*.  At some point, it may
 #       be worth while to write some failure tests for things that should
 #       *break* (such as calls with wrong number of args).  For now, I'm
diff --git a/t/op/my.t b/t/op/my.t
index 6feabe4e0a..d219f80852 100755
--- a/t/op/my.t
+++ b/t/op/my.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: my.t,v $
-
 print "1..34\n";
 
 sub foo {
diff --git a/t/op/push.t b/t/op/push.t
index a67caed2b3..8b12e6144f 100755
--- a/t/op/push.t
+++ b/t/op/push.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: push.t,v $$Revision: 4.1 $$Date: 92/08/07 18:28:13 $
-
 @tests = split(/\n/, <<EOF);
 0 3,			0 1 2,		3 4 5 6 7
 0 0 a b c,		,		a b c 0 1 2 3 4 5 6 7
diff --git a/t/op/read.t b/t/op/read.t
index 99a62166ce..8235bc2072 100755
--- a/t/op/read.t
+++ b/t/op/read.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: read.t,v $$Revision: 4.1 $$Date: 92/08/07 18:28:17 $
-
 BEGIN {
     chdir 't';
     @INC = '../lib';
diff --git a/t/op/time.t b/t/op/time.t
index 2105e9dc41..fc73a7bf68 100755
--- a/t/op/time.t
+++ b/t/op/time.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: time.t,v $$Revision: 4.1 $$Date: 92/08/07 18:28:32 $
-
 if ( $does_gmtime = gmtime(time) ) { 
     print "1..7\n" 
 }
diff --git a/t/op/unshift.t b/t/op/unshift.t
index 68d37756bd..0c26623309 100755
--- a/t/op/unshift.t
+++ b/t/op/unshift.t
@@ -1,7 +1,5 @@
 #!./perl
 
-# $RCSfile: unshift.t,v $$Revision: 4.1 $$Date: 92/08/07 18:28:35 $
-
 print "1..2\n";
 
 @a = (1,2,3);