allow AV/HV dereferences on pseudohashes ($ph->{foo}[1], etc.)

[p5sagit/p5-mst-13.2.git] / t / lib / findbin.t

diff --git a/t/lib/findbin.t b/t/lib/findbin.t
old mode 100644 (file)
new mode 100755 (executable)
index 8d5347c..f0939e9
--- a/t/lib/findbin.t
+++ b/t/lib/findbin.t
@@ -2,12 +2,12 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    unshift @INC, '../lib';
 }
 
 print "1..1\n";
 
 use FindBin qw($Bin);
 
-print "not " unless $Bin =~ m,t/lib$,;
+print "not " unless $Bin =~ m,t[/.]lib\]?$,;
 print "ok 1\n";