better perl version output in corelist-diff

[perl5.git] / configpm

diff --git a/configpm b/configpm
index 9fb30ee..b8fea15 100755 (executable)
--- a/configpm
+++ b/configpm
@@ -124,7 +124,7 @@ use strict;
 # use vars pulls in Carp
 
 sub _V {
-    my ($bincompat, $non_bincompat, $date, $osname, @patches) = Internals::V();
+    my ($bincompat, $non_bincompat, $date, @patches) = Internals::V();
 
     my $opts = join ' ', sort split ' ', "$bincompat $non_bincompat";
 
@@ -146,7 +146,7 @@ sub _V {
         print "\t$_\n" foreach @patches;
     }
 
-    print "  Built under $osname\n";
+    print "  Built under $^O\n";
 
     print "  $date\n" if defined $date;