Test preamble: unify to dot slash test dot pl

42 files changed, 42 insertions, 42 deletions

diff --git a/t/io/crlf.t b/t/io/crlf.t
index f26ea0d85e..ea138fa204 100644
--- a/t/io/crlf.t
+++ b/t/io/crlf.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require "test.pl";
+    require "./test.pl";
     skip_all_without_perlio();
 }
 
diff --git a/t/io/errnosig.t b/t/io/errnosig.t
index 8effcf1144..ef6a7bd9f9 100644
--- a/t/io/errnosig.t
+++ b/t/io/errnosig.t
@@ -6,7 +6,7 @@ BEGIN {
 }
 
 require Config; import Config;
-require "test.pl";
+require "./test.pl";
 plan(tests => 1);
 
 SKIP: {
diff --git a/t/lib/no_load.t b/t/lib/no_load.t
index 39f0dc6816..5852005610 100644
--- a/t/lib/no_load.t
+++ b/t/lib/no_load.t
@@ -11,7 +11,7 @@ BEGIN {
 use strict;
 use warnings;
 
-require "test.pl";
+require "./test.pl";
 
 #
 # Format: [Module-that-should-not-be-loaded => modules to test]
diff --git a/t/op/array.t b/t/op/array.t
index bc5c096d7a..54ef3f2d54 100644
--- a/t/op/array.t
+++ b/t/op/array.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = ('.', '../lib');
-    require 'test.pl';
+    require './test.pl';
 }
 
 plan (170);
diff --git a/t/op/auto.t b/t/op/auto.t
index 00f7caa077..90380ed46d 100644
--- a/t/op/auto.t
+++ b/t/op/auto.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan( tests => 47 );
diff --git a/t/op/chdir.t b/t/op/chdir.t
index d785285a03..813b0edc2e 100644
--- a/t/op/chdir.t
+++ b/t/op/chdir.t
@@ -9,7 +9,7 @@ BEGIN {
     # chdir() works!  Instead, we'll hedge our bets and put both
     # possibilities into @INC.
     unshift @INC, qw(t . lib ../lib);
-    require "test.pl";
+    require "./test.pl";
     plan(tests => 48);
 }
 
diff --git a/t/op/chr.t b/t/op/chr.t
index 57b4adeb2c..b15957ca5b 100644
--- a/t/op/chr.t
+++ b/t/op/chr.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib); # ../lib needed for test.deparse
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan tests => 42;
diff --git a/t/op/context.t b/t/op/context.t
index 8753d1ee34..5272b7a915 100644
--- a/t/op/context.t
+++ b/t/op/context.t
@@ -5,7 +5,7 @@ BEGIN {
     @INC = qw(. ../lib);
 }
 
-require "test.pl";
+require "./test.pl";
 plan( tests => 7 );
 
 sub foo {
diff --git a/t/op/coreamp.t b/t/op/coreamp.t
index ffd02df3db..9a9ab48a7e 100644
--- a/t/op/coreamp.t
+++ b/t/op/coreamp.t
@@ -10,7 +10,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib ../dist/if);
-    require "test.pl";
+    require "./test.pl";
     $^P |= 0x100;
 }
 
diff --git a/t/op/coresubs.t b/t/op/coresubs.t
index 36a6a104dd..612db5c9bb 100644
--- a/t/op/coresubs.t
+++ b/t/op/coresubs.t
@@ -7,7 +7,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require "test.pl";
+    require "./test.pl";
     skip_all_without_dynamic_extension('B');
     $^P |= 0x100;
 }
diff --git a/t/op/crypt.t b/t/op/crypt.t
index 27c878f1bd..424a24ff6e 100644
--- a/t/op/crypt.t
+++ b/t/op/crypt.t
@@ -8,7 +8,7 @@ BEGIN {
 BEGIN {
     use Config;
 
-    require "test.pl";
+    require "./test.pl";
 
     if( !$Config{d_crypt} ) {
         skip_all("crypt unimplemented");
diff --git a/t/op/defins.t b/t/op/defins.t
index 54d31507e6..86e0dd8287 100644
--- a/t/op/defins.t
+++ b/t/op/defins.t
@@ -9,7 +9,7 @@ BEGIN {
     @INC = qw(. ../lib);
     $SIG{__WARN__} = sub { $warns++; warn $_[0] };
 }
-require 'test.pl';
+require './test.pl';
 plan( tests => 27 );
 
 my $unix_mode = 1;
diff --git a/t/op/delete.t b/t/op/delete.t
index 493717e768..e6833273aa 100644
--- a/t/op/delete.t
+++ b/t/op/delete.t
@@ -5,7 +5,7 @@ BEGIN {
     @INC = qw(. ../lib);
 }
 
-require "test.pl";
+require "./test.pl";
 plan( tests => 38 );
 
 # delete() on hash elements
diff --git a/t/op/die_keeperr.t b/t/op/die_keeperr.t
index 083bd5d121..055a8020a5 100644
--- a/t/op/die_keeperr.t
+++ b/t/op/die_keeperr.t
@@ -2,7 +2,7 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    require 'test.pl';
+    require './test.pl';
     plan(24);
 }
 
diff --git a/t/op/flip.t b/t/op/flip.t
index bb1526d673..579395082a 100644
--- a/t/op/flip.t
+++ b/t/op/flip.t
@@ -1,7 +1,7 @@
 #!./perl
 
 BEGIN {
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan(12);
diff --git a/t/op/for.t b/t/op/for.t
index 36af7fd7e7..563caadfa5 100644
--- a/t/op/for.t
+++ b/t/op/for.t
@@ -1,7 +1,7 @@
 #!./perl
 
 BEGIN {
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan(107);
diff --git a/t/op/glob.t b/t/op/glob.t
index e6f3680afa..7eec330563 100644
--- a/t/op/glob.t
+++ b/t/op/glob.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require 'test.pl';
+    require './test.pl';
 }
 
 plan( tests => 18 );
diff --git a/t/op/goto.t b/t/op/goto.t
index 13e6b042ab..ccee71b556 100644
--- a/t/op/goto.t
+++ b/t/op/goto.t
@@ -5,7 +5,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require "test.pl";
+    require "./test.pl";
 }
 
 use warnings;
diff --git a/t/op/grep.t b/t/op/grep.t
index d34686d831..ea434a54ef 100644
--- a/t/op/grep.t
+++ b/t/op/grep.t
@@ -7,7 +7,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan( tests => 66 );
diff --git a/t/op/hashwarn.t b/t/op/hashwarn.t
index b14e9c27ca..a6a1de9480 100644
--- a/t/op/hashwarn.t
+++ b/t/op/hashwarn.t
@@ -5,7 +5,7 @@ BEGIN {
     @INC = qw(. ../lib);
 }
 
-require 'test.pl';
+require './test.pl';
 plan( tests => 16 );
 
 use strict;
diff --git a/t/op/incfilter.t b/t/op/incfilter.t
index 905d8199ba..9019ba5df3 100644
--- a/t/op/incfilter.t
+++ b/t/op/incfilter.t
@@ -5,7 +5,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require 'test.pl';
+    require './test.pl';
     skip_all_if_miniperl('no dynamic loading on miniperl, no Filter::Util::Call');
     skip_all_without_perlio();
 }
diff --git a/t/op/list.t b/t/op/list.t
index 0f6e0bcc22..d14873f3a2 100644
--- a/t/op/list.t
+++ b/t/op/list.t
@@ -5,7 +5,7 @@ BEGIN {
     @INC = qw(. ../lib);
 }
 
-require "test.pl";
+require "./test.pl";
 plan( tests => 65 );
 
 @foo = (1, 2, 3, 4);
diff --git a/t/op/localref.t b/t/op/localref.t
index 3f4934423e..d481f150f0 100644
--- a/t/op/localref.t
+++ b/t/op/localref.t
@@ -2,7 +2,7 @@
 
 chdir 't' if -d 't';
 @INC = qw(. ../lib);
-require "test.pl";
+require "./test.pl";
 plan( tests => 64 );
 
 $aa = 1;
diff --git a/t/op/loopctl.t b/t/op/loopctl.t
index d520a7fa31..a603420bb7 100644
--- a/t/op/loopctl.t
+++ b/t/op/loopctl.t
@@ -33,7 +33,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan( tests => 67 );
diff --git a/t/op/method.t b/t/op/method.t
index 31e2ea13c8..3e26f2f3b5 100644
--- a/t/op/method.t
+++ b/t/op/method.t
@@ -7,7 +7,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib lib ../dist/base/lib);
-    require "test.pl";
+    require "./test.pl";
 }
 
 use strict;
diff --git a/t/op/ord.t b/t/op/ord.t
index 1c82262b05..51b2a4e38d 100644
--- a/t/op/ord.t
+++ b/t/op/ord.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib); # ../lib needed for test.deparse
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan tests => 35;
diff --git a/t/op/postfixderef.t b/t/op/postfixderef.t
index e60b33b2f6..3d60b9e261 100644
--- a/t/op/postfixderef.t
+++ b/t/op/postfixderef.t
@@ -11,7 +11,7 @@ this file contains all dereferencing tests from ref.t but using postfix instead
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require 'test.pl';
+    require './test.pl';
 }
 
 use strict qw(refs subs);
diff --git a/t/op/print.t b/t/op/print.t
index a98b0bf845..31a476c24b 100644
--- a/t/op/print.t
+++ b/t/op/print.t
@@ -1,7 +1,7 @@
 #!./perl
 
 BEGIN {
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan(3);
diff --git a/t/op/protowarn.t b/t/op/protowarn.t
index 0cf946afa5..eb046e5bb6 100644
--- a/t/op/protowarn.t
+++ b/t/op/protowarn.t
@@ -9,7 +9,7 @@ use strict;
 use warnings;
 
 BEGIN {
-    require 'test.pl';
+    require './test.pl';
     plan( tests => 12 );
 }
 
diff --git a/t/op/quotemeta.t b/t/op/quotemeta.t
index 9e620761e2..7f5705dd62 100644
--- a/t/op/quotemeta.t
+++ b/t/op/quotemeta.t
@@ -4,7 +4,7 @@ BEGIN {
     chdir 't' if -d 't';
     @INC = qw(../lib .);
     require Config; import Config;
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan tests => 60;
diff --git a/t/op/rand.t b/t/op/rand.t
index 90d1c375d1..b3bfdd4222 100644
--- a/t/op/rand.t
+++ b/t/op/rand.t
@@ -23,7 +23,7 @@ BEGIN {
 use strict;
 use Config;
 
-require "test.pl";
+require "./test.pl";
 plan(tests => 10);
 
 
diff --git a/t/op/range.t b/t/op/range.t
index 903cdeed39..7809882fb2 100644
--- a/t/op/range.t
+++ b/t/op/range.t
@@ -5,7 +5,7 @@ BEGIN {
     @INC = ('../lib', '.');
 }   
 # Avoid using eq_array below as it uses .. internally.
-require 'test.pl';
+require './test.pl';
 
 use Config;
 
diff --git a/t/op/recurse.t b/t/op/recurse.t
index 2a0201a69e..c64dda151e 100644
--- a/t/op/recurse.t
+++ b/t/op/recurse.t
@@ -7,7 +7,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require "test.pl";
+    require "./test.pl";
     plan(tests => 28);
 }
 
diff --git a/t/op/ref.t b/t/op/ref.t
index 244dbd83fc..8c9e3fd302 100644
--- a/t/op/ref.t
+++ b/t/op/ref.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
-    require 'test.pl';
+    require './test.pl';
 }
 
 use strict qw(refs subs);
diff --git a/t/op/sleep.t b/t/op/sleep.t
index 3f5bbe0d3f..441f76a6aa 100644
--- a/t/op/sleep.t
+++ b/t/op/sleep.t
@@ -5,7 +5,7 @@ BEGIN {
     @INC = qw(. ../lib);
 }
 
-require "test.pl";
+require "./test.pl";
 plan( tests => 4 );
 
 use strict;
diff --git a/t/op/srand.t b/t/op/srand.t
index 5321cde656..61c64d29ef 100644
--- a/t/op/srand.t
+++ b/t/op/srand.t
@@ -9,7 +9,7 @@ BEGIN {
 
 use strict;
 
-require "test.pl";
+require "./test.pl";
 plan(tests => 10);
 
 # Generate a load of random numbers.
diff --git a/t/op/sselect.t b/t/op/sselect.t
index 879c9d5231..d0dc33bccd 100644
--- a/t/op/sselect.t
+++ b/t/op/sselect.t
@@ -7,7 +7,7 @@ BEGIN {
     $hires = eval 'use Time::HiResx "time"; 1';
 }
 
-require 'test.pl';
+require './test.pl';
 
 plan (15);
 
diff --git a/t/op/unshift.t b/t/op/unshift.t
index a6cd692942..8ef68fd597 100644
--- a/t/op/unshift.t
+++ b/t/op/unshift.t
@@ -1,7 +1,7 @@
 #!./perl
 
 BEGIN {
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan(36);
diff --git a/t/op/ver.t b/t/op/ver.t
index 3969d11709..149672517d 100644
--- a/t/op/ver.t
+++ b/t/op/ver.t
@@ -4,7 +4,7 @@ BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib);
     $SIG{'__WARN__'} = sub { warn $_[0] if $DOWARN };
-    require "test.pl";
+    require "./test.pl";
 }
 
 $DOWARN = 1; # enable run-time warnings now
diff --git a/t/run/exit.t b/t/run/exit.t
index 02e57c65f8..ce3270e4f8 100644
--- a/t/run/exit.t
+++ b/t/run/exit.t
@@ -39,7 +39,7 @@ if ($^O eq 'VMS') {
     $numtests = 29 unless $vms_exit_mode;
 }
 
-require "test.pl";
+require "./test.pl";
 plan(tests => $numtests);
 
 my $native_success = 0;
diff --git a/t/uni/method.t b/t/uni/method.t
index abe3c8342c..53c5485837 100644
--- a/t/uni/method.t
+++ b/t/uni/method.t
@@ -7,7 +7,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(. ../lib ../cpan/parent/lib);
-    require "test.pl";
+    require "./test.pl";
 }
 
 use strict;
diff --git a/t/uni/sprintf.t b/t/uni/sprintf.t
index 08626498e2..258ab541b4 100644
--- a/t/uni/sprintf.t
+++ b/t/uni/sprintf.t
@@ -3,7 +3,7 @@
 BEGIN {
     chdir 't' if -d 't';
     @INC = qw(../lib .);
-    require "test.pl";
+    require "./test.pl";
 }
 
 plan tests => 52;