This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Rewrite to correctly use test.pl
[perl5.git] / t / op / sub.t
index b76d34c..b6f90f4 100644 (file)
@@ -1,12 +1,12 @@
-#!./perl
+#!./perl -w
 
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
-    require Config; import Config;
+    require './test.pl';
 }
 
-use Test::More tests => 4;
+plan( tests => 4 );
 
 sub empty_sub {}