| line |
true |
false |
branch |
|
25
|
0 |
16 |
unless exists $self->{'log_level'} |
|
28
|
16 |
0 |
unless $self->{'log_level'} =~ /^\d+$/ |
|
30
|
1 |
15 |
if ($self->{'no_trace'}) { } |
|
|
6 |
9 |
elsif ($self->{'skip_packages'} and &reftype($self->{'skip_packages'}) eq 'REGEXP') { } |
|
33
|
1 |
0 |
unless $text =~ /\n$/ |
|
41
|
0 |
6 |
$self->{'skip_me'} ? : |
|
53
|
3 |
3 |
$self->{'full_trace'} ? : |
|
66
|
1 |
8 |
if $self->{'skip_me'} |
|
68
|
3 |
6 |
if (exists $self->{'skip_packages'}) |
|
69
|
1 |
2 |
if (&reftype($self->{'skip_packages'}) eq 'ARRAY') { } |
|
79
|
3 |
6 |
$self->{'full_trace'} ? : |
|
99
|
1 |
10 |
if $method_level > $self->{'log_level'} |