http://www.perlmonks.org?node_id=998508


in reply to Proc::Simple store return from background process

Short answer: You cannot with Proc::Simple (longer: in your case when starting a sub{...} as a child process)

This is what happens in the child part of the fork() that is executed for your $func = sub{...};

# in Proc::Simple # $func = sub{ ... }; # your code ... if(ref($func) eq "CODE") { $self->dprt("Launching code"); $func->(@params); exit 0; # Start perl subroutine } else { ...
So, the exit 0 (successful execution) is all that is returned from your sub{...}. The $return value is discarded.

Your sub{...} could return the result to the main process by means of IPC or by storing the result in a temporary file (e.g. YAML, JSON, Storable, etc.). The parent process could read the result from a pipe or load the serialised data from a file after the sub has finished.
Update: IPC::Lite

However, I guess, that in this particular case, you're better off with threads and maybe a queue.

Replies are listed 'Best First'.
Re^2: Proc::Simple store return from background process
by perldarren (Novice) on Oct 12, 2012 at 10:34 UTC
    Ok, I see.

    To get around this I made my routine physically exit with the return code I originally wanted to return.

    I can then read this as Proc::Simple intended using something like:
    my $exit = $child_procs{myhost}{proc}->exit_status(); my $exit_code = $exit >> 8;
    Thank you very much for your help.

    Regards, Darren