| line |
true |
false |
branch |
|
69
|
0 |
268 |
unless defined $caller[0] |
|
70
|
227 |
41 |
if $caller[0] =~ /^MVC::Neaf/ |
|
71
|
1 |
40 |
if $caller[0]->isa("MVC::Neaf::Util::Base") |
|
74
|
2 |
38 |
wantarray ? : |
|
88
|
15 |
901 |
if ($want_slash) { } |
|
115
|
1 |
281 |
if (grep {$_ =~ /$re_path_not/;} @_) |
|
119
|
168 |
114 |
wantarray ? : |
|
163
|
148 |
0 |
$allowed ? : |
|
164
|
0 |
148 |
$required ? : |
|
166
|
0 |
148 |
if (@extra + @missing) |
|
169
|
0 |
0 |
if @missing |
|
171
|
0 |
0 |
if @extra |
|
239
|
1598 |
0 |
unless defined $key and $key =~ /^[a-z_][a-z_0-9]*$/i |
|
267
|
0 |
508 |
unless defined wantarray |
|
270
|
75 |
112 |
ref $item eq 'ARRAY' ? : |
|
|
187 |
321 |
defined $item ? : |
|
274
|
333 |
175 |
wantarray ? : |
|
305
|
0 |
4 |
unless defined $in |
|
339
|
20 |
1 |
if eval {
do {
&$sub(@args);
1
}
} |
|
399
|
171 |
3 |
unless &openhandle($fh) and not eof $fh |