Integrate:

[p5sagit/p5-mst-13.2.git] / cygwin / perlld.in

diff --git a/cygwin/perlld.in b/cygwin/perlld.in
index 8055054..ddaaed9 100644 (file)
--- a/cygwin/perlld.in
+++ b/cygwin/perlld.in
@@ -46,8 +46,7 @@ if ($args !~ /\-o (\S+)/) {
     $path =~ s,[/\\](\.[/\\])*,/,g;
   }
   if ($dllname =~ /\./) { $libname =$`; } else { $libname =$dllname; };
-  my $v_e_r_s;
-  ($v_e_r_s = sprintf("%vd", $^V)) =~ tr/./_/; # v5.8.1 -> 5_8_1
+  my $v_e_r_s = '5_8_1';
   if ( $dllname =~ /.*perl.*/) { 
     $dllname ="cygperl$v_e_r_s.dll";
   } else {