Help for this page
waitpid($pid, 0); my @data = (<READER>);
my @data = (<READER>); waitpid($pid, 0);