| line |
true |
false |
branch |
|
133
|
1 |
205 |
unless (defined $ARGS{'level'} and grep {$ARGS{'level'} eq $_;} $App::CELL::Status::log->permitted_levels) |
|
138
|
124 |
82 |
unless ($ARGS{'caller'}) |
|
142
|
172 |
34 |
unless defined $ARGS{'args'} |
|
145
|
69 |
137 |
if ($ARGS{'code'}) |
|
148
|
69 |
0 |
if ($status->ok) { } |
|
155
|
0 |
0 |
if ($ARGS{'args'}) { } |
|
167
|
57 |
149 |
if $ARGS{'level'} ne "OK" and $ARGS{'level'} ne "NOT_OK" |
|
198
|
2 |
4 |
if (not %ARGS) { } |
|
|
2 |
2 |
elsif (exists $ARGS{'to'}) { } |
|
|
2 |
0 |
elsif (exists $ARGS{'fd'}) { } |
|
201
|
0 |
2 |
if ($ARGS{'to'} eq 'string') { } |
|
|
2 |
0 |
elsif ($ARGS{'to'} eq 'log') { } |
|
|
0 |
0 |
elsif ($ARGS{'to'} eq 'fd' and exists $ARGS{'fd'}) { } |
|
217
|
2 |
4 |
if ($action eq 'string') { } |
|
|
2 |
2 |
elsif ($action eq 'log') { } |
|
|
2 |
0 |
elsif ($action eq 'fd') { } |
|
247
|
4 |
0 |
if ($ARGS{'code'} and $ARGS{'code'} ne $ARGS{'text'}) |
|
272
|
116 |
36 |
if (&blessed($self)) |
|
274
|
93 |
23 |
if $self->level eq "OK" |
|
279
|
7 |
29 |
if $payload |
|
302
|
38 |
2 |
if (&blessed($self)) |
|
304
|
14 |
24 |
if $self->{'level'} ne "OK" |
|
308
|
1 |
1 |
if $payload |
|
323
|
1 |
218 |
if @_ |
|
337
|
1 |
82 |
if @_ |
|
350
|
1 |
4 |
if @_ |
|
363
|
62 |
6 |
if $_[0]{'text'} |
|
392
|
0 |
139 |
if (defined $new_payload) |
|
394
|
0 |
0 |
if $self->{'payload'} |
|
410
|
2 |
0 |
if exists $self->{'msgobj'} |
|
424
|
0 |
1 |
unless &blessed($self) |
|
435
|
0 |
1 |
if $status |
|
439
|
4 |
3 |
if grep {$key eq $_;} "args", "called_from_status", "caller", "msgobj" |