Searched refs:open (Results 1 - 25 of 784) sorted by relevance

1234567891011>>

/osnet-11/usr/src/lib/libplot/vt0/common/
H A Dopen.c42 vti = open("/dev/vt0", 1);
48 vti = open("/dev/vt0", 1);
/osnet-11/usr/src/lib/libshadowfs/common/
H A Dmkerrpo.sh32 open=' \/\* '
37 ( egrep $pattern | sed -n "s/$open/$openrepl/p" |
H A Dmkerrno.sh41 open=' \/\* '
46 ( sed -n "s/$pattern/$replace/p" | sed -n "s/$open/$openrepl/p" |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Dread.t8 open(FOO,'op/read.t') || open(FOO,'t/op/read.t') || open(FOO,':op:read.t') || die "Can't open op.read";
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A DFatal.t10 use Fatal qw(open close :void opendir);
13 eval { open FOO, '<lkjqweriuapofukndajsdlfjnvcvn' };
14 print "not " unless $@ =~ /^Can't open/;
19 eval qq{ open $_, '<$0' };
31 print "not " unless $@ =~ /^Can't open/;
35 print "not " if $@ =~ /^Can't open/;
H A DSelectSaver.t12 open(FOO, ">foo-$$") || die;
21 open(FOO, "foo-$$") || die;
/osnet-11/usr/src/lib/scsi/libscsi/common/
H A Dmkerrno.sh47 open=' \/\* '
52 ( sed -n "s/$pattern/$replace/p" | sed -n "s/$open/$openrepl/p" |
/osnet-11/usr/src/lib/scsi/libses/common/
H A Dmkerrno.sh46 open=' \/\* '
51 ( sed -n "s/$pattern/$replace/p" | sed -n "s/$open/$openrepl/p" |
/osnet-11/usr/src/lib/scsi/libsmp/common/
H A Dmkerrno.sh44 open=' \/\* '
49 ( sed -n "s/$pattern/$replace/p" | sed -n "s/$open/$openrepl/p" |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/io/
H A Ddup.t15 open(DUPOUT,">&STDOUT");
16 open(DUPERR,">&STDERR");
18 open(STDOUT,">Io.dup") || die "Can't open stdout";
19 open(STDERR,">&STDOUT") || die "Can't open stderr";
55 open(STDOUT,">&DUPOUT") or die "Could not open: $!";
56 open(STDERR,">&DUPERR") or die "Could not open
[all...]
H A Dopen.t23 ok( open(my $f,"+>afile"), 'open(my $f, "+>...")' );
43 ok( open(my $f,'>', 'afile'), "open(my \$f, '>', 'afile')" );
50 ok( open(my $f,'>>', 'afile'), "open(my \$f, '>>', 'afile')" );
57 ok( open(my $f, '<', 'afile'), "open(my \$f, '<', 'afile')" );
68 ok( open(my $f, '+<', 'afile'), 'open
[all...]
H A Dargv.t16 open(TRY, '>Io_argv1.tmp') || (die "Can't open temp file: $!");
52 open(TRY, '>Io_argv1.tmp') or die "Can't open temp file: $!";
54 open(TRY, '>Io_argv2.tmp') or die "Can't open temp file: $!";
66 open(TRY, '<Io_argv1.tmp') or die "Can't open temp file: $!";
68 open(TRY, '<Io_argv2.tmp') or die "Can't open tem
[all...]
H A Dutf8.t20 open(F,"+>:utf8",'a');
58 open F, ">:utf8", 'a' or die $!;
62 open F, "<:utf8", 'a' or die $!;
67 open F, "a" or die $!; # Not UTF
76 open F, ">:utf8", 'a' or die $!;
106 open F, "a" or die $!; # Not UTF
114 open F, "<:utf8", "a" or die $!;
120 open F, ">", "a" or die $!;
136 open F, ">:utf8", "a" or die $!;
142 open
[all...]
H A Dpipe.t22 open(PIPE, "|-") || exec $Perl, '-pe', 'tr/YX/ko/';
24 printf PIPE "Xk %d - open |- || exec\n", curr_test();
35 if (open(PIPE, "-|")) {
43 printf STDOUT "not ok %d - open -|\n", curr_test();
56 pipe(READER,WRITER) || die "Can't open pipe";
73 open(STDOUT,">&WRITER") || die "Can't dup WRITER to STDOUT";
87 pipe(READER,WRITER) || die "Can't open pipe";
121 open NIL, qq{|$Perl -e "exit 0"} or die "open failed: $!";
137 open NI
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/base/
H A Dterm.t44 open(try,"Dev:Null") || (die "Can't open /dev/null.");
46 open(try, "/dev/null") || open(try,"nla0:") || (die "Can't open /dev/null.");
57 open(try, "harness") || (die "Can't open harness.");
H A Drs.t11 open TESTFILE, ">./foo" or die "error $! $^E opening";
16 open TESTFILE, "<./foo";
60 open TESTFILE, ">./foo";
64 open TESTFILE, "<./foo";
95 open FDLFILE, "> ./foo.fdl";
98 open CREATEFILE, "> ./foo.com";
106 open(TEMPFILE, ">./foo.bar") or print "# open failed $! $^E\n";
110 open TESTFILE, "<./foo.bar";
134 # see if open/readlin
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/t/
H A Dinit.t11 open ($IN, "t/init_test.txt");
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/PerlIO/t/
H A Dfail.t18 ok(open(FH,">",$file),"Create works");
20 ok(open(FH,"<",$file),"Normal open works");
36 ok(!open(FH,"<:-)",$file),"All punctuation fails open");
42 ok(!open(FH,"<:nonesuch",$file),"Bad package fails open");
47 ok(open(FH,"<",$file),"Normal open (still) works");
H A Dvia.t25 ok( !open($fh,"<via(PerlIO::via::QuotedPrint)", $tmp), 'open QuotedPrint for input fails');
26 ok( open($fh,">via(PerlIO::via::QuotedPrint)", $tmp), 'open QuotedPrint for output');
30 ok( open($fh,"<via(PerlIO::via::QuotedPrint)", $tmp), 'open QuotedPrint for input');
44 my $fd = open($fh,">$tmp") && fileno($fh);
48 ok( ! open($fh,">via(Unknown::Module)", $tmp), 'open via Unknown::Module will fail');
51 # Now open normall
[all...]
H A Dscalar.t17 open($fh,"+<",\$var) or print "not ";
45 open $fh, ">", \$var;
68 open $fh, ">>", \$var;
94 open $fh, "<", \$var;
107 open $fh, "+>", \$var;
109 open $dup,'+<&',$fh;
120 open $fh, '<', \42;
127 tie $p, P; open $fh, '<', \$p;
136 open my $fh, '>', \my $scalar;
H A Dencoding.t28 if (open(GRK, ">$grk")) {
36 open(my $i,'<:encoding(iso-8859-7)',$grk);
38 open(my $o,'>:utf8',$utf);
46 if (open(UTF, "<$utf")) {
61 open(my $i,'<:utf8',$utf);
63 open(my $o,'>:encoding(iso-8859-7)',$grk);
71 if (open(GRK, "<$grk")) {
80 if (open(FAIL, ">:encoding(NoneSuch)", $fail1)) {
93 if (open(RUSSKI, ">$russki")) {
96 open(RUSSK
[all...]
H A Dfallback.t29 ok(open(my $fh,">encoding(iso-8859-1)",$file),"opened iso-8859-1 file");
36 open($fh,$file) || die "File cannot be re-opened";
43 ok(open(my $fh,">encoding(iso-8859-1)",$file),"opened iso-8859-1 file");
48 open($fh,$file) || die "File cannot be re-opened";
55 open($fh,">$file") || die "File cannot be re-opened";
61 ok(open($fh,"<encoding(US-ASCII)",$file),"Opened as ASCII");
69 ok(open($fh,"<encoding(US-ASCII)",$file),"Opened as ASCII");
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/comp/
H A Dcpp.aux17 open(TRY,">Comp_cpp.tmp") || die "Can't open temp perl file: $!";
30 open(TRY,">Comp_cpp.inc") || (die "Can't open temp include file: $!");
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/t/
H A Dio_utf8.t22 ok($io->open("io_utf8", ">:utf8"), "open >:utf8");
27 ok($io->open("io_utf8", "<:utf8"), "open <:utf8");
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/cmd/
H A Dmod.t37 open(foo,'./TEST') || open(foo,'TEST') || open(foo,'t/TEST');

Completed in 95 milliseconds

1234567891011>>