hi,
I am executing an external CLI utilties using the command pipe. I want to get the status of the command and also the output(error/info).
I am using the following code.

sub cmd_pipe {
  my $cmd = shift;

  open CMD, "$cmd | " or die "Cannot exec $cmd, $!";
  my @data = <CMD>;
  my $result = close(CMD);

  return($result, @data);
}
[download]

Problem here is, it returns the status correctly. Output is not stored in @data. But it is displayed in the console.
Can anybody figure out the error in my code?.
Thanks