| line |
true |
false |
branch |
|
60
|
1 |
45 |
unless (@patterns) |
|
93
|
5 |
81 |
if ($pat eq ':split') |
|
101
|
7 |
79 |
if ($pat =~ /^:(no)?warn$/) { } |
|
|
6 |
73 |
elsif ($pat =~ /^:(no)?prefix$/) { } |
|
|
6 |
67 |
elsif ($pat =~ /^:(no)?override$/) { } |
|
|
7 |
60 |
elsif ($pat =~ /^:(no)?link$/) { } |
|
|
3 |
57 |
elsif ($pat eq ':all') { } |
|
|
3 |
54 |
elsif (ref $pat eq 'Regexp') { } |
|
|
4 |
50 |
elsif ($pat =~ /[*?]/) { } |
|
|
49 |
1 |
elsif ($pat =~ /^[A-Za-z_]\w*$/) { } |
|
103
|
6 |
1 |
$1 ? : |
|
107
|
1 |
5 |
$1 ? : |
|
111
|
2 |
4 |
$1 ? : |
|
115
|
2 |
5 |
$1 ? : |
|
192
|
7 |
12 |
if (exists $$callersym{$subname} and defined &{$$callersym{$subname};} and not $$_{'override'}) |
|
198
|
2 |
5 |
if ($$_{'warn'}) |
|
211
|
8 |
377 |
if ($$_{'link'}) { } |
|
213
|
1 |
7 |
if ($$_{'split'}) { } |
|
229
|
5 |
372 |
if ($$_{'split'}) { } |