Re: the remaining bugs in \x escapes (was Re: [PATCH] oct and hex in glorious 64...

[p5sagit/p5-mst-13.2.git] / t / op / undef.t

diff --git a/t/op/undef.t b/t/op/undef.t
index 3bfe1a3..f6e36a5 100755 (executable)
--- a/t/op/undef.t
+++ b/t/op/undef.t
@@ -1,5 +1,10 @@
 #!./perl
 
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = '../lib';
+}
+
 print "1..27\n";
 
 print defined($a) ? "not ok 1\n" : "ok 1\n";