| 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 |
|
146
|
18 |
69 |
if defined $gp |
|
|
0 |
0 |
if defined $gp |
|
150
|
36 |
51 |
if defined $ENV{$ep_level} |
|
|
0 |
0 |
if defined $ENV{$ep_level} |
|
153
|
4 |
47 |
if $gp_level and defined $ENV{$gp_level} |
|
|
0 |
0 |
if $gp_level and defined $ENV{$gp_level} |
|
157
|
12 |
35 |
if (defined $ENV{$ep_upto}) { } |
|
|
10 |
25 |
elsif ($gp_upto and defined $ENV{$gp_upto}) { } |
|
|
25 |
0 |
elsif (defined $self->{'default_upto'}) { } |
|
|
0 |
0 |
if (defined $ENV{$ep_upto}) { } |
|
|
0 |
0 |
elsif ($gp_upto and defined $ENV{$gp_upto}) { } |
|
|
0 |
0 |
elsif (defined $self->{'default_upto'}) { } |
|
160
|
0 |
12 |
unless defined $self->{'level_nums'}{$upto} |
|
|
0 |
0 |
unless defined $self->{'level_nums'}{$upto} |
|
165
|
0 |
10 |
unless defined $self->{'level_nums'}{$upto} |
|
|
0 |
0 |
unless defined $self->{'level_nums'}{$upto} |