fix t/lib/fields.t's @INC so make test runs

p4raw-id: //depot/perl@1323

diff --git a/t/lib/fields.t b/t/lib/fields.t
index fe6ed18..139e469 100755 (executable)
--- a/t/lib/fields.t
+++ b/t/lib/fields.t
@@ -1,8 +1,5 @@
 #!./perl -w
 
-use strict;
-use vars qw($DEBUG);
-
 my $w;
 
 BEGIN {
@@ -17,6 +14,9 @@ BEGIN {
    };
 }
 
+use strict;
+use vars qw($DEBUG);
+
 package B1;
 use fields qw(b1 b2 b3);