| line |
true |
false |
branch |
|
16
|
72 |
81 |
$_ =~ /_IS/u ? : |
|
17
|
135 |
18 |
eval {
do {
'Fcntl'->can($_)->($_ =~ /_IS/u ? 0 : ());
1
}
} ? : |
|
50
|
0 |
28 |
if (ref $_[$i] eq 'HASH') { } |
|
|
3 |
25 |
elsif ($_[$i] =~ /^-(type|src|dst|tmp|src_userdb|dst_userdb|rewrite_path|rewrite_user|rewrite_group)\z/u) { } |
|
57
|
1 |
14 |
if (keys %ctor_opts) |
|
61
|
1 |
0 |
unless grep /^(add|:.*methods)\z/u, @_ |
|
79
|
1 |
0 |
unless $class =~ /::/u |
|
80
|
0 |
1 |
unless &$is_module_name($class) |
|
82
|
0 |
1 |
unless eval {
do {
&$require_module($class)
}
} |
|
99
|
0 |
25 |
if &looks_like_number($_[0]) |
|
100
|
0 |
0 |
if builtin::blessed($_[0]) |
|
101
|
2 |
5 |
if builtin::blessed($_[0]) and $_[0]->can("add") |
|
102
|
6 |
5 |
if builtin::blessed($_[0]) and $_[0]->can("user") |
|
103
|
3 |
15 |
if builtin::blessed($_[0]) |
|
104
|
4 |
14 |
if builtin::blessed($_[0]) |
|
108
|
2 |
2 |
&isa_array($data) ? : |
|
124
|
16 |
9 |
if @_ == 1 and &isa_array($_[0]) |
|
125
|
9 |
16 |
@_ > 2 && &isa_hash($_[-1]) ? : |
|
128
|
0 |
25 |
if (&isa_int($mode)) { } |
|
129
|
0 |
0 |
unless $mode_desc = $_mode_by_int[$mode & S_IFMT()] |
|
133
|
0 |
25 |
unless $mode =~ /^([a-z]+)([0-7]+)?\z/u |
|
135
|
0 |
25 |
unless $mode_desc = $_mode_alias{$1} |
|
137
|
13 |
12 |
defined $2 ? : |
|
140
|
0 |
25 |
unless length $name |
|
142
|
16 |
9 |
if (defined $data) |
|
143
|
4 |
12 |
if ($mode_desc and $mode_desc->[2]) { } |