open (my $call, '-|', "$command 2>&1");
$output = join //, <$call>;
# or use { local $/; $output = <$call>; }
close ($call);