From: Jarkko Hietaniemi Date: Tue, 22 Feb 2000 18:38:29 +0000 (+0000) Subject: Perl version nit spotted by Spider Boardman. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=dd101d755db106008f0a83c18ff0bfc7eb6bbdde;p=p5sagit%2Fp5-mst-13.2.git Perl version nit spotted by Spider Boardman. p4raw-id: //depot/cfgperl@5207 --- diff --git a/configpm b/configpm index 8c53dbb..19d0d71 100755 --- a/configpm +++ b/configpm @@ -17,7 +17,7 @@ my $glossary = $ARGV[1] || 'Porting/Glossary'; open CONFIG, ">$config_pm" or die "Can't open $config_pm: $!\n"; -$myver = $]; +$myver = sprintf "v%vd", $^V; print CONFIG <<'ENDOFBEG_NOQ', <<"ENDOFBEG"; package Config; @@ -38,8 +38,9 @@ sub import { } ENDOFBEG_NOQ -\$] == $myver - or die "Perl lib version ($myver) doesn't match executable version (\$])"; +\$^V eq $myver + or die "Perl lib version ($myver) doesn't match executable version (" . + (sprintf "v%vd",\$^V) . ")"; # This file was created by configpm when Perl was built. Any changes # made to this file will be lost the next time perl is built.