| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
| regexp_noamp.t | 10 die "Cannot find ./op/regexp.t or ./t/op/regexp.t\n";
|
| die.t | 9 die $err;
16 eval { die $x; };
23 die [ 5 ];
25 die if $@;
30 die bless [ 7 ], "Error";
32 die if $@;
48 # die/warn and utf8
52 eval { die $msg }; print "not " unless $@ eq $msg;
56 eval { die $msg }; print "not " unless $err eq $msg;
|
| subst_wamp.t | 10 die "Cannot find op/subst.t or t/op/subst.t\n";
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/comp/ |
| cpp.aux | 17 open(TRY,">Comp_cpp.tmp") || die "Can't open temp perl file: $!";
28 close TRY or die "Could not close Comp_cpp.tmp: $!";
30 open(TRY,">Comp_cpp.inc") || (die "Can't open temp include file: $!");
32 close TRY or die "Could not close Comp_cpp.tmp: $!";
|
| /onnv/onnv-gate/usr/src/cmd/fm/fmadm/common/ |
| load.c | 39 die("module name must be specified using absolute path\n");
42 die("failed to load %s", argv[1]);
55 die("module must be specified using basename only\n");
58 die("failed to unload %s", argv[1]);
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/File/ |
| Copy.t | 23 open(F, ">file-$$") or die;
30 open(F, "copy-$$") or die;
42 unlink "copy-$$" or die "unlink: $!";
46 open(R, "copy-$$") or die "open copy-$$: $!"; $foo = <R>; close(R);
49 unlink "copy-$$" or die "unlink: $!";
52 close(F) or die "close: $!";
53 open(R, "copy-$$") or die; $foo = <R>; close(R) or die "close: $!";
56 unlink "copy-$$" or die "unlink: $!";
59 $fh = IO::File->new(">copy-$$") or die "Cannot open copy-$$:$!"
[all...] |
| /onnv/onnv-gate/usr/src/cmd/dis/ |
| dis_util.h | 38 void die(const char *, ...);
|
| /onnv/onnv-gate/usr/src/cmd/mdb/tools/common/ |
| util.h | 40 extern void die(char *, ...);
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/ |
| SelectSaver.t | 12 open(FOO, ">foo-$$") || die;
21 open(FOO, "foo-$$") || die;
|
| shellwords.pl | 25 die "Unmatched double quote: $_\n";
31 die "Unmatched single quote: $_\n";
|
| /onnv/onnv-gate/usr/src/cmd/ramdiskadm/ |
| utils.h | 44 extern void die(const char *, ...);
|
| /onnv/onnv-gate/usr/src/cmd/rctladm/ |
| utils.h | 46 extern void die(char *, ...) __NORETURN;
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/io/ |
| argv.t | 16 open(TRY, '>Io_argv1.tmp') || (die "Can't open temp file: $!");
18 close TRY or die "Could not close: $!";
52 open(TRY, '>Io_argv1.tmp') or die "Can't open temp file: $!";
53 close TRY or die "Could not close: $!";
54 open(TRY, '>Io_argv2.tmp') or die "Can't open temp file: $!";
55 close TRY or die "Could not close: $!";
66 open(TRY, '<Io_argv1.tmp') or die "Can't open temp file: $!";
68 open(TRY, '<Io_argv2.tmp') or die "Can't open temp file: $!";
70 close TRY or die "Could not close: $!";
77 open STDIN, 'Io_argv1.tmp' or die $!
[all...] |
| dup.t | 18 open(STDOUT,">Io.dup") || die "Can't open stdout";
19 open(STDERR,">&STDOUT") || die "Can't open stderr";
52 close(STDOUT) or die "Could not close: $!";
53 close(STDERR) or die "Could not close: $!";
55 open(STDOUT,">&DUPOUT") or die "Could not open: $!";
56 open(STDERR,">&DUPERR") or die "Could not open: $!";
65 open(F,">&",1) or die "Cannot dup to numeric 1: $!";
69 open(F,">&",'1') or die "Cannot dup to string '1': $!";
73 open(F,">&=",1) or die "Cannot dup to numeric 1: $!";
78 open(F,">&=",'1') or die "Cannot dup to string '1': $!"
[all...] |
| fflush.t | 52 open IN, $f or die "open $f: $!";
63 open PROG, "> ff-prog" or die "open ff-prog: $!";
67 open OUT, ">> $f" or die "open $f: $!";
72 close PROG or die "close ff-prog: $!";;
82 open OUT, "> $f" or die "open $f: $!";
88 close OUT or die "close $f: $!";
94 exec $command or die $!;
98 die "fork: $!";
117 open PIPE, "$c|" or die "$c: $!";
126 open OUT, "> $f" or die "open $f: $!"
[all...] |
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/base/ |
| term.t | 44 open(try,"Dev:Null") || (die "Can't open /dev/null.");
46 open(try, "/dev/null") || open(try,"nla0:") || (die "Can't open /dev/null.");
54 die "/dev/null IS NOT A CHARACTER SPECIAL FILE!!!!\n" unless -c '/dev/null';
57 open(try, "harness") || (die "Can't open harness.");
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/utils/ |
| cpan.PL | 21 open OUT,">$file" or die "Can't create $file: $!";
42 die "$0: cannot find '$cpan'\n";
45 close OUT or die "Can't close $file: $!";
46 chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
|
| enc2xs.PL | 21 open OUT,">$file" or die "Can't create $file: $!";
42 die "$0: cannot find '$enc2xs'\n";
45 close OUT or die "Can't close $file: $!";
46 chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
|
| instmodsh.PL | 21 open OUT,">$file" or die "Can't create $file: $!";
42 die "$0: cannot find '$instmodsh'\n";
45 close OUT or die "Can't close $file: $!";
46 chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
|
| piconv.PL | 21 open OUT,">$file" or die "Can't create $file: $!";
42 die "$0: cannot find '$piconv'\n";
45 close OUT or die "Can't close $file: $!";
46 chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
|
| prove.PL | 21 open OUT,">$file" or die "Can't create $file: $!";
43 die "$0: cannot find '$prove'\n";
46 close OUT or die "Can't close $file: $!";
47 chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
|
| splain.PL | 25 open IN or die "Can't open $IN: $!\n";
28 open OUT,">$file" or die "Can't create $file: $!";
47 close OUT or die "Can't close $file: $!";
48 chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
|
| xsubpp.PL | 21 open OUT,">$file" or die "Can't create $file: $!";
42 die "$0: cannot find '$xsubpp'\n";
45 close OUT or die "Can't close $file: $!";
46 chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/cmd/ |
| while.t | 5 open (tmp,'>Cmd_while.tmp') || die "Can't create Cmd_while.tmp.";
11 close tmp or die "Could not close: $!";
15 open(fh,'Cmd_while.tmp') || die "Can't open Cmd_while.tmp.";
24 open(fh,'Cmd_while.tmp') || die "Can't open Cmd_while.tmp.";
34 open(fh,'Cmd_while.tmp') || die "Can't open Cmd_while.tmp.";
50 open(fh,'Cmd_while.tmp') || die "Can't open Cmd_while.tmp.";
63 open(fh,'Cmd_while.tmp') || die "Can't open Cmd_while.tmp.";
77 open(fh,'Cmd_while.tmp') || die "Can't open Cmd_while.tmp.";
91 close(fh) || die "Can't close Cmd_while.tmp.";
|
| /onnv/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Net/demos/ |
| nntp.mirror | 26 chdir($BaseDir) or die "Could not cd to $BaseDir\n";
33 open(GROUPLIST, 'grouplist.txt') or die "Could not open grouplist.txt\n";
50 { die "Could not make $BaseDir/$GroupName\n" }
52 chdir("$BaseDir/$GroupName") or die "Couldn't chdir to $GroupName\n";
63 { die "In $GroupName, the last number was $NumLast, but the " .
75 die "Could not create $GroupName/$GetArtNum\n";
|
