| line |
true |
false |
branch |
|
38
|
34 |
30 |
unless (defined $category_cache->{$category}) |
|
60
|
74 |
9 |
if ($category =~ /$entry->{'pattern'}/) |
|
106
|
18 |
26 |
if (ref $_[0] eq "HASH") |
|
111
|
1 |
43 |
unless (defined $adapter_name and $adapter_name =~ /\S/) |
|
117
|
40 |
3 |
if (not defined $pattern) { } |
|
|
1 |
2 |
elsif (not ref $pattern) { } |
|
132
|
16 |
21 |
if (my $lex_ref = $options->{'lexically'}) |
|
134
|
16 |
0 |
unless &_in_global_destruction() |
|
170
|
0 |
59 |
if &_in_global_destruction() |
|
177
|
91 |
4 |
if ($new_entry ne $category_info->{'entry'}) |
|
191
|
6 |
94 |
if $Log::Any::OverrideDefaultAdapterClass |
|
193
|
11 |
83 |
substr($adapter_name, 0, 1) eq '+' ? : |
|
222
|
68 |
30 |
if $class->can("new") |
|
224
|
2 |
28 |
unless (defined eval "require $class; 1") |