Lines Matching refs:open

21 open(PIPE, "|-") || exec $Perl, '-pe', 'tr/YX/ko/';
30     if (open(PIPE, "-|")) {
49     if (open(PIPE, "-|")) {
70     if (open(PIPE, "|-")) {
111             open(STDOUT,">&WRITER") || die "Can't dup WRITER to STDOUT";
160 	print open(F, "<&=$fdr") ? 1 : 0, "\\n";
161 	print open(F, ">&=$fdw") ? 1 : 0, "\\n";
179         open NIL, qq{|$Perl -e "exit 0"} or die "open failed: $!";
193         open NIL, qq{|$Perl -e "exit 23";} or die "fork failed: $!";
207             my $pipe = open *FH, "sleep 2;exit 13|" or die "Open: $!\n";
226   ok( !open(P, "|    "),        'missing command in piped open input' );
227   ok( !open(P, "     |"),       '                              output');
233     open NIL, qq{|$Perl -e "exit 23"} or die "fork failed: $!";
243   open NIL, '/no_such_process |';
265 my \$pid = open my \$fh, "|\$cmd" or die "\$!\n";