diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-02-22 18:38:29 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-02-22 18:38:29 +0000 |
commit | dd101d755db106008f0a83c18ff0bfc7eb6bbdde (patch) | |
tree | a0f9357794aeb265f65493583afe2d02749f14b0 /configpm | |
parent | d3a4b2ba6901538e050a5a3fced30a16ff8fb9b0 (diff) | |
download | perl-dd101d755db106008f0a83c18ff0bfc7eb6bbdde.tar.gz |
Perl version nit spotted by Spider Boardman.
p4raw-id: //depot/cfgperl@5207
Diffstat (limited to 'configpm')
-rwxr-xr-x | configpm | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -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. |