X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FFindBin.pm;h=5d4c575cbcd245ae1fca7717454ed459adc6f637;hb=f7e7eb72c805f1b630a3d1a32ed33c0f6da60bea;hp=9d35f6f9c9cc4328f32fb771857f63a1a59b5b78;hpb=9426adcd48655815b65cea5a9f1eebbe7e23a9df;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/FindBin.pm b/lib/FindBin.pm
index 9d35f6f..5d4c575 100644
--- a/lib/FindBin.pm
+++ b/lib/FindBin.pm
@@ -102,7 +102,7 @@ BEGIN
 
    if ($^O eq 'VMS')
     {
-     ($Bin,$Script) = VMS::Filespec::rmsexpand($0) =~ /(.*\])(.*)/;
+     ($Bin,$Script) = VMS::Filespec::rmsexpand($0) =~ /(.*\])(.*)/s;
      ($RealBin,$RealScript) = ($Bin,$Script);
     }
    else