you can create a child process to read what you want, like :

$SIG{'CHLD'}='IGNORE';
$pid=fork;
if(!$pid´){
     (read stuff);
}
(stdin stuff);
[download]