Re: [PATCH] Re: perl winpid?

[perl5.git] / cygwin / perlld.in

diff --git a/cygwin/perlld.in b/cygwin/perlld.in
index b33d0e2..0e30c39 100644 (file)
--- a/cygwin/perlld.in
+++ b/cygwin/perlld.in
@@ -46,8 +46,9 @@ if ($args !~ /\-o (\S+)/) {
     $path =~ s,[/\\](\.[/\\])*,/,g;
   }
   if ($dllname =~ /\./) { $libname =$`; } else { $libname =$dllname; };
-  my $v_e_r_s = '5_9_0';
-  if ( $dllname =~ /.*perl.*/) { 
+  my $v_e_r_s = '@VERSION@';
+  $v_e_r_s =~ tr/./_/;
+  if ( $dllname =~ /libperl.*/) { 
     $dllname ="cygperl$v_e_r_s.dll";
   } else {
   $dllname ="$libname.dll";