| line |
true |
false |
branch |
|
24
|
2 |
196 |
unless defined $name
|
|
41
|
5 |
193 |
if (exists $opts->{'caller'}) { }
|
|
46
|
193 |
0 |
unless defined $level
|
|
51
|
198 |
0 |
unless defined $message
|
|
54
|
198 |
0 |
unless $opts->{'tp_opts'}
|
|
66
|
198 |
0 |
unless defined $loglevel
|
|
75
|
17 |
0 |
unless $opts
|
|
76
|
0 |
0 |
if ref $opts eq "CODE"
|
|
80
|
0 |
0 |
unless defined $name
|
|
83
|
0 |
0 |
unless defined $message
|
|
85
|
0 |
0 |
unless $opts->{'tp_opts'}
|
|
90
|
0 |
0 |
unless defined $loglevel
|
|
94
|
0 |
0 |
if $level < $loglevel
|
|
105
|
45 |
7 |
if @_ and ref $_[0] eq "HASH"
|
|
108
|
9 |
3 |
$ref eq 'ARRAY' ? :
|
|
|
89 |
12 |
$ref eq 'CODE' ? :
|