line |
true |
false |
branch |
164
|
2 |
0 |
if @ARGS |
229
|
15 |
3 |
if (defined $ARGS{'ident'}) { } |
230
|
0 |
15 |
if ($ARGS{'ident'} eq $ident and $ident ne 'CELLtest') { } |
242
|
8 |
10 |
if (exists $ARGS{'debug_mode'}) |
243
|
7 |
1 |
if $ARGS{'debug_mode'} |
244
|
1 |
7 |
unless $ARGS{'debug_mode'} |
249
|
0 |
18 |
if (exists $ARGS{'show_caller'}) |
250
|
0 |
0 |
if $ARGS{'show_caller'} |
251
|
0 |
0 |
unless $ARGS{'show_caller'} |
266
|
0 |
0 |
if $self->can('SUPER::DESTROY') |
284
|
19 |
937 |
unless (grep {$_ =~ /$method/iu;} @permitted_levels) |
290
|
937 |
0 |
if @ARGS % 2 == 0 |
294
|
2 |
935 |
if ($method_uc eq 'OK' or $method_uc eq 'NOT_OK') { } |
304
|
824 |
113 |
if (%ARGS) { } |
305
|
59 |
765 |
if ($ARGS{'caller'}) { } |
|
108 |
657 |
elsif ($ARGS{'suppress_caller'}) { } |
318
|
723 |
99 |
if ($ARGS{'cell'} and $method_lc eq 'debug' || $method_lc eq 'trace') |
319
|
723 |
0 |
unless $ENV{'CELL_DEBUG_MODE'} |
322
|
0 |
214 |
unless $log_any_obj |
323
|
0 |
214 |
unless $log_any_obj |
324
|
35 |
115 |
if not $debug_mode and $method_lc eq 'debug' || $method_lc eq 'trace' |
325
|
0 |
179 |
unless ($msg_text) |
346
|
59 |
0 |
if $caller |
347
|
57 |
2 |
if $cell |
348
|
38 |
21 |
if ($code ne $text) |
351
|
0 |
59 |
unless $text |
354
|
0 |
59 |
unless $log_any_obj |
376
|
0 |
0 |
if ($level eq 'OK') { } |
|
0 |
0 |
elsif ($level eq 'NOT_OK') { } |
389
|
65 |
114 |
if ($file and 'File::Spec'->file_name_is_absolute($file)) |
393
|
167 |
12 |
if $show_caller and $file |