Hi ptkdb, here is the full sub listing...

sub _run_ReadWrite {
    my ($invocant, $cmd, $input) = @_;

    # declare needed variables and connect to process
    local (*CHILD_IN, *CHILD_OUT, *CHILD_ERR);
    my ($childpid, @outlines, @errlines);
    $childpid = open3(*CHILD_IN, *CHILD_OUT, *CHILD_ERR, $cmd);

    # feed input to process, then close input
    print CHILD_IN $input; close (CHILD_IN);

    # save output and errors, close those channels and the process
    chomp(@outlines = <CHILD_OUT>); close (CHILD_OUT);
    chomp(@errlines = <CHILD_ERR>); close (CHILD_ERR);
    waitpid($childpid, 0);

    # return the result of the call
    return { OUTPUT => \@outlines , ERRORS => \@errlines };
}
[download]

Now like I said, calls to this sub return exactly what I expect, as long as I pass a valid $cmd and $input.

The problem is when a call to this function is made from a script that has, for some reason, closed STDOUT, the @outlines array ends out empty. The process doesn't hang or fail, in fact everything works fine, its just that the launched process' output "gets lost" somewhere. I want to be able to catch it !

Is that clearer ?

Thanks for your help