Change #2483 update.

p4raw-id: //depot/cfgperl@2497

diff --git a/t/op/tr.t b/t/op/tr.t
index aa1f9b2..4e6667c 100755 (executable)
--- a/t/op/tr.t
+++ b/t/op/tr.t
@@ -1,7 +1,9 @@
 # tr.t
 
-chdir 't' if -d 't';
-@INC = "../lib";
+BEGIN {
+    chdir 't' if -d 't';
+    unshift @INC, "../lib";
+}
 
 print "1..4\n";