On Mon, Mar 08, 2010 at 02:14:29PM +0000, Matthew Booth wrote:
---
lib/Sys/VirtV2V/ExecHelper.pm | 18 +++++-------------
1 files changed, 5 insertions(+), 13 deletions(-)
diff --git a/lib/Sys/VirtV2V/ExecHelper.pm b/lib/Sys/VirtV2V/ExecHelper.pm
index 87f6d06..110ae9f 100644
--- a/lib/Sys/VirtV2V/ExecHelper.pm
+++ b/lib/Sys/VirtV2V/ExecHelper.pm
@@ -68,25 +68,17 @@ sub run
my $self = {};
bless($self, $class);
- $self->{output} = File::Temp->new();
- $self->{status} = $self->_run(@command);
-
- return $self;
-}
-
-sub _run
-{
- my $self = shift;
- my @command = @_;
-
- my $output = $self->{output};
-
my $null;
open($null, '<', '/dev/null') or die("Failed to open
/dev/null: $!");
+ my $output = File::Temp->new();
my $pid = open3($null, $output, $output, @command);
waitpid($pid, 0);
+
$self->{status} = $? >> 8;
+ $self->{output} = $output;
+
+ return $self;
}
=item status
--
1.6.6.1
Yup, seems pretty obvious, ACK.
Rich.
--
Richard Jones, Virtualization Group, Red Hat
http://people.redhat.com/~rjones
virt-top is 'top' for virtual machines. Tiny program with many
powerful monitoring features, net stats, disk stats, logging, etc.
http://et.redhat.com/~rjones/virt-top