This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Test that for's iterator aliases the iterated list
[perl5.git] / t / uni / title.t
index 458ca8e..45c895f 100644 (file)
@@ -4,7 +4,7 @@ BEGIN {
       print("1..0 # miniperl: no Unicode::Normalize");
       exit(0);
     }
       print("1..0 # miniperl: no Unicode::Normalize");
       exit(0);
     }
-    require "uni/case.pl";
+    require "./uni/case.pl";
 }
 
 use feature 'unicode_strings';
 }
 
 use feature 'unicode_strings';