my @data = (<READER>);
waitpid($pid, 0);