$SIG{'CHLD'}='IGNORE';
$pid=fork;
if(!$pidī){
     (read stuff);
}
(stdin stuff);