[perl #43265] cygwin/Makefile.SHs: miniperl -Ilib for a clean @INC

[p5sagit/p5-mst-13.2.git] / utils / pl2pm.PL

diff --git a/utils/pl2pm.PL b/utils/pl2pm.PL
index f4ca79d..d135bc8 100644 (file)
--- a/utils/pl2pm.PL
+++ b/utils/pl2pm.PL
@@ -129,7 +129,7 @@ while (<>) {
     if ( open(PM, ">$newname") ) {
         print PM <<"END";
 package $newpack;
-require 5.6.0;
+use 5.006;
 require Exporter;
 $carp
 \@ISA = qw(Exporter);
@@ -313,7 +313,6 @@ q
 qq
 qr
 quotemeta
-qu
 qw
 qx
 rand