Special test preambles needed for these.
[perl.git] / t / lib / mypragma.t
index 2e7b0ab..eb93e7c 100644 (file)
@@ -1,15 +1,15 @@
 #!./perl
 
-use strict;
-use warnings;
-
 BEGIN {
     chdir 't' if -d 't';
     require './test.pl';
-    @INC = '../lib';
+    @INC = qw(lib ../lib);
     plan(tests => 14);
 }
 
+use strict;
+use warnings;
+
 use mypragma (); # don't enable this pragma yet
 
 BEGIN {