| line |
true |
false |
branch |
|
26
|
0 |
1 |
eval {
do {
require Sub::Name;
1
}
} && defined &Sub::Name::subname ? : |
|
|
5 |
1 |
eval {
do {
require Sub::Util;
1
}
} && defined &Sub::Util::set_subname ? : |
|
|
0 |
6 |
$INC{'Sub/Name.pm'} && defined &Sub::Name::subname ? : |
|
|
2 |
6 |
$INC{'Sub/Util.pm'} && defined &Sub::Util::set_subname ? : |
|
30
|
0 |
1 |
$impl eq 'SN' ? : |
|
|
7 |
1 |
$impl eq 'SU' ? : |
|
32
|
7 |
1 |
$impl ? : |
|
47
|
15 |
2 |
@args == 1 && ref $args[0] ? : |
|
52
|
0 |
17 |
unless $self->{'env_prefix'} = $args->{'env_prefix'} |
|
55
|
25 |
43 |
if exists $args->{$field} |
|
57
|
10 |
7 |
if (defined $self->{'label'} and length $self->{'label'}) |
|
58
|
2 |
8 |
unless exists $args->{'label_length'} |
|
76
|
0 |
102 |
unless $level_colors{$level} |
|
|
85 |
17 |
if (@{[] unless $level_colors{$level};}) |
|
82
|
14 |
3 |
unless (exists $self->{'default_upto'}) |
|
120
|
38 |
0 |
unless $message =~ /\n\z/ |
|
123
|
15 |
23 |
if $self->{'effective_label'} |
|
131
|
0 |
35 |
unless $self->$is_name |
|
|
0 |
3 |
unless $self->$is_name |
|
151
|
18 |
69 |
if (defined $self->{'group_env_prefix'}) |
|
|
0 |
0 |
if (defined $self->{'group_env_prefix'}) |
|
152
|
4 |
14 |
if (ref $self->{'group_env_prefix'}) { } |
|
|
0 |
0 |
if (ref $self->{'group_env_prefix'}) { } |
|
165
|
40 |
65 |
if defined $ENV{$env_var} |
|
|
0 |
0 |
if defined $ENV{$env_var} |
|
174
|
22 |
35 |
if (defined $ENV{$env_var}) |
|
|
0 |
0 |
if (defined $ENV{$env_var}) |
|
177
|
0 |
22 |
unless defined $self->{'level_nums'}{$upto} |
|
|
0 |
0 |
unless defined $self->{'level_nums'}{$upto} |
|
184
|
0 |
25 |
unless defined $upto or defined $self->{'default_upto'} |
|
|
0 |
0 |
unless defined $upto or defined $self->{'default_upto'} |
|
187
|
25 |
22 |
unless defined $upto |
|
|
0 |
0 |
unless defined $upto |