| line |
true |
false |
branch |
|
33
|
1 |
16 |
$orig ? : |
|
35
|
17 |
0 |
$proto ? : |
|
40
|
0 |
1 |
defined $exit_code ? : |
|
45
|
2 |
34 |
if $USE_REAL_EXIT |
|
54
|
0 |
17 |
if $@ |
|
62
|
13 |
86 |
ref $class ? : |
|
66
|
88 |
11 |
if (ref $script eq 'SCALAR') { } |
|
85
|
37 |
62 |
$code =~ /^#!.*\s-w\b/ ? : |
|
88
|
8 |
91 |
defined $1 ? : |
|
91
|
11 |
88 |
$path ? : |
|
|
11 |
88 |
$dir ? : |
|
|
11 |
88 |
$path ? : |
|
144
|
6 |
93 |
if $exception |
|
150
|
0 |
0 |
unless $_[0] =~ /^No such signal/ |
|
161
|
0 |
11 |
unless open my $fh, "<", $file |
|
172
|
99 |
0 |
if defined $_ |
|
180
|
11 |
0 |
$package ? : |
|
194
|
14 |
85 |
unless (-d $tmp_dir) |
|
195
|
0 |
14 |
unless mkdir $tmp_dir |
|
196
|
0 |
14 |
unless chmod 0700, $tmp_dir |
|
207
|
0 |
99 |
unless unlink $fname |
|
213
|
14 |
3 |
if ($tmp_dir and -d $tmp_dir) |