The new t/lib/io_linenum.t was using stricture

before @INC was set up.

p4raw-id: //depot/cfgperl@3500

diff --git a/t/lib/io_linenum.t b/t/lib/io_linenum.t
index e981b95..3503215 100755 (executable)
--- a/t/lib/io_linenum.t
+++ b/t/lib/io_linenum.t
@@ -3,8 +3,6 @@
 # test added 29th April 1999 by Paul Johnson (pjcj@transeda.com)
 # updated    28th May   1999 by Paul Johnson
 
-use strict;
-
 my $File;
 
 BEGIN
@@ -16,6 +14,7 @@ BEGIN
     $File =~ s/^t\W+//;                                 # Remove first directory
   }
   unshift @INC, '../lib' if -d '../lib';
+  require strict; import strict;
 }
 
 use Test;