open( my $pipe, '-|', @cmd ) or die "Could not call @cmd[0]: $!";
my @Result = <$pipe>;
close $pipe;