1use ExtUtils::MakeMaker; 2 3@VMS = ($^O eq 'VMS') ? (MAN3PODS => {}) : (); 4 5WriteMakefile( 6 NAME => 'Errno', 7 VERSION_FROM => 'Errno_pm.PL', 8 MAN3PODS => {}, # Pods will be built by installman. 9 PL_FILES => {'Errno_pm.PL'=>'Errno.pm'}, 10 PM => {'Errno.pm' => '$(INST_LIBDIR)/Errno.pm'}, 11 'clean' => {FILES => 'Errno.pm'}, 12 'dist' => { 13 COMPRESS => 'gzip -9f', 14 SUFFIX => '.gz', 15 DIST_DEFAULT => 'd/Errno.pm tardist', 16 }, 17 @VMS, 18); 19 20sub MY::postamble { 21 my $TARG = MM->catfile('d','Errno.pm'); 22qq!$TARG : Makefile 23 echo '#This is a dummy file so CPAN will find a VERSION' > $TARG 24 echo 'package Errno;' >> $TARG 25 echo '\$\$VERSION = "\$(VERSION)";' >>$TARG 26 echo '#This is to make sure require will return an error' >>$TARG 27 echo '0;' >>$TARG 28 29! 30} 31