open COMMAND,'-|','some_command';
$input=<COMMAND>;
close COMMAND;
#... bla bla
$pid=fork
#....bla bla
wait if $pid
#... bla bla