my $cmdOutput = openCommandAsInput( )
...
if( $cmdOutput->pending ) {
    my $line = $cmdPutput->dequeue() or last;
    ...

##</code><code>##

my $cmd_fh = open_pipe_command( $cmd );
...
if( $cmd_fh->can_read ) {
    my $line = $cmd_fh->readline or last;
    ...