--- lib/IPC/Cmd.pm.orig	2006-11-24 16:53:57 +0300
+++ lib/IPC/Cmd.pm	2007-08-07 01:14:20 +0400
@@ -26,7 +26,6 @@ BEGIN {
 
 require Carp;
 use Params::Check               qw[check];
-use Module::Load::Conditional   qw[can_load];
 use Locale::Maketext::Simple    Style => 'gettext';
 
 =pod
@@ -101,12 +100,6 @@ sub can_use_ipc_run     { 
     ### ipc::run doesn't run on win98    
     return if IS_WIN98;
 
-    ### if we dont have ipc::run, we obviously can't use it.
-    return unless can_load(
-                        modules => { 'IPC::Run' => '0.55' },        
-                        verbose => ($WARN && $verbose),
-                    );
-                    
     ### otherwise, we're good to go
     return 1;                    
 }

--- lib/IPC/Cmd.pm.orig	2007-08-07 01:15:16 +0400
+++ lib/IPC/Cmd.pm	2007-08-07 01:18:17 +0400
@@ -117,13 +117,6 @@ sub can_use_ipc_open3   { 
     my $self    = shift;
     my $verbose = shift || 0;
 
-    ### ipc::open3 works on every platform, but it can't capture buffers
-    ### on win32 :(
-    return unless can_load(
-        modules => { map {$_ => '0.0'} qw|IPC::Open3 IO::Select Symbol| },
-        verbose => ($WARN && $verbose),
-    );
-    
     return 1;
 }