my $pid = open2(\*OUT, \*IN, '| findstr hello');
                              ^