This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
patch@32181 IPC::Cmd fix for VMS.
authorJohn E. Malmberg <wb8tyw@qsl.net>
Thu, 25 Oct 2007 00:36:29 +0000 (19:36 -0500)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 25 Oct 2007 08:42:44 +0000 (08:42 +0000)
From: "John E. Malmberg" <wb8tyw@qsl.net>
Message-id: <47202B5D.8070609@qsl.net>

p4raw-id: //depot/perl@32187

lib/IPC/Cmd.pm

index f41647c..bb951f8 100644 (file)
@@ -125,6 +125,10 @@ sub can_use_ipc_open3   {
     my $self    = shift;
     my $verbose = shift || 0;
 
+    ### ipc::open3 is not working on VMS becasue of a lack of fork.
+    ### todo, win32 also does not have fork, so need to do more research.
+    return 0 if IS_VMS;
+
     ### ipc::open3 works on every platform, but it can't capture buffers
     ### on win32 :(
     return unless can_load(