my $proc = Wx::Perl::ProcessStream->OpenProcess(qq~perl "$doc"~ , 'Output-Extention', $win);