line |
true |
false |
branch |
94
|
3 |
1254 |
if defined ${$target . "::" . "DEBUG";} |
96
|
0 |
1257 |
if $DEBUG |
107
|
1256 |
1 |
if defined ${$target . "::" . "DEBUG";} |
109
|
0 |
1257 |
if $DEBUG |
131
|
7 |
8 |
unless @_ |
136
|
0 |
8 |
if $debug =~ /^off$/i |
140
|
0 |
8 |
if $DEBUG |
142
|
8 |
0 |
if (defined ${$pkg . '::' . 'DEBUG';}) { } |
163
|
2 |
7 |
if (defined $sub) { } |
169
|
2 |
7 |
$class eq $pkg ? : |
193
|
28 |
0 |
defined $data->{$1} ? : |
194
|
9 |
0 |
unless $format =~ /\n$/ |
238
|
0 |
0 |
unless @info |
261
|
2 |
0 |
@_ == 1 ? : |
264
|
2 |
0 |
unless ref $modules eq "ARRAY" |
283
|
1 |
2 |
$code ? : |
296
|
0 |
13 |
if (not defined $_[1]) { } |
|
9 |
4 |
elsif (not ref $_[1]) { } |
|
2 |
2 |
elsif (&blessed($_[1]) and my $code = $_[1]->can($DUMP_METHOD)) { } |
314
|
0 |
4 |
if $Badger::Debug::DUMPING->{$data}++ |
317
|
3 |
1 |
if (UNIVERSAL::isa($data, 'HASH')) { } |
|
1 |
0 |
elsif (UNIVERSAL::isa($data, 'ARRAY')) { } |
|
0 |
0 |
elsif (UNIVERSAL::isa($data, 'Regexp')) { } |
|
0 |
0 |
elsif (UNIVERSAL::isa($data, 'SCALAR')) { } |
346
|
0 |
4 |
if $indent > $MAX_DEPTH |
349
|
0 |
4 |
unless $hash and %$hash |
351
|
1 |
3 |
if ($keys) |
352
|
1 |
0 |
unless ref $keys |
354
|
1 |
0 |
if ref $keys eq "ARRAY" |
356
|
0 |
1 |
unless ref $keys eq "HASH" |
359
|
0 |
1 |
if $DEBUG |
366
|
3 |
9 |
$keys ? : |
367
|
0 |
12 |
/^_/ && $HIDE_UNDER ? : |
379
|
0 |
1 |
unless @$list |
382
|
1 |
0 |
@$list ? : |
390
|
0 |
0 |
if ref $text |
393
|
0 |
0 |
if length $text > $length |