use IPC::Open3;
      my $pid = open3(*IN, *OUT, *ERR, $command);
            
      waitpid $pid, 0;

      close(IN);
      my @outlines = <OUT>;