| line |
true |
false |
branch |
|
117
|
0 |
8451 |
unless @$symbols |
|
131
|
0 |
76 |
unless @$symbols |
|
144
|
1182 |
0 |
unless ref $debug eq "HASH" |
|
168
|
1 |
130 |
@_ ? : |
|
203
|
12287 |
594 |
@_ ? : |
|
207
|
8599 |
4282 |
@_ ? : |
|
273
|
0 |
54 |
@_ ? : |
|
276
|
1 |
34 |
if ($base eq $pkg) { } |
|
277
|
1 |
0 |
if $pkg =~ /(\w+)$/ |
|
295
|
0 |
0 |
unless $_[0]{'symbols'}{$_[1]} |
|
296
|
0 |
0 |
unless $_[0]{'symbols'}{$_[1]} |
|
297
|
0 |
0 |
unless $_[0]{'symbols'}{$_[1]} |
|
298
|
0 |
0 |
unless $_[0]{'symbols'}{$_[1]} |
|
299
|
0 |
0 |
unless $_[0]{'symbols'}{$_[1]} |
|
300
|
0 |
0 |
unless scalar_ref(@_) |
|
301
|
0 |
0 |
unless array_ref(@_) |
|
302
|
0 |
0 |
unless hash_ref(@_) |
|
325
|
105 |
125 |
@_ ? : |
|
346
|
0 |
595 |
if &DEBUG() |
|
347
|
179 |
416 |
if defined ${$pkg . "::" . $name;} |
|
355
|
84 |
32 |
@_ == 1 ? : |
|
359
|
82 |
34 |
unless ref $names eq "ARRAY" |
|
367
|
0 |
380 |
if &DEBUG() |
|
368
|
84 |
296 |
if defined ${$pkg . "::" . $name;} |
|
388
|
0 |
6683 |
if &DEBUG() |
|
390
|
3914 |
2769 |
if defined($value = ${$pkg . "::" . $name;}) |
|
391
|
0 |
6683 |
if &DEBUG() and $value |
|
394
|
1941 |
229 |
wantarray ? : |
|
408
|
72 |
87 |
unless defined $list |
|
409
|
66 |
21 |
if (ref $list eq 'ARRAY') { } |
|
410
|
0 |
66 |
unless @$list |
|
424
|
43 |
112 |
wantarray ? : |
|
440
|
95 |
46 |
unless defined $hash |
|
441
|
0 |
46 |
unless (ref $hash eq "HASH") |
|
460
|
0 |
1944 |
unless ref $hash eq "HASH" |
|
462
|
1939 |
5 |
if defined $hash->{$item} |
|
489
|
0 |
721 |
wantarray ? : |
|
499
|
0 |
720 |
unless defined($item = pop @pending) |
|
506
|
2580 |
0 |
wantarray ? : |
|
517
|
2127 |
0 |
@_ == 1 ? : |
|
520
|
2127 |
0 |
unless ref $bases eq "ARRAY" |
|
526
|
251 |
2061 |
if $pkg->isa($base) |
|
527
|
0 |
2061 |
if &DEBUG() |
|
536
|
3 |
0 |
@_ == 1 ? : |
|
538
|
3 |
0 |
unless ref $mixins eq "ARRAY" |
|
556
|
0 |
0 |
@_ == 1 ? : |
|
559
|
0 |
0 |
unless ref $syms eq "ARRAY" |
|
565
|
0 |
0 |
if &DEBUG() |
|
575
|
0 |
1384 |
if &DEBUG() |
|
580
|
1384 |
0 |
unless defined ${$pkg . "::" . "VERSION";} and ${$pkg . "::" . "VERSION";} |
|
582
|
1384 |
0 |
unless defined &{$pkg . "::" . "VERSION";} |
|
589
|
775 |
22 |
@_ == 1 ? : |
|
594
|
0 |
797 |
unless ref $constants eq "HASH" |
|
602
|
0 |
2449 |
if &DEBUG() |
|
610
|
493 |
0 |
@_ == 1 ? : |
|
613
|
493 |
0 |
unless ref $words eq "ARRAY" |
|
619
|
0 |
1287 |
if &DEBUG() |
|
641
|
637 |
1 |
@_ && ref $_[0] eq 'HASH' ? : |
|
650
|
1 |
637 |
if ($messages) { } |
|
651
|
0 |
1 |
if &DEBUG() |
|
655
|
0 |
637 |
if &DEBUG() |
|
669
|
4 |
21 |
unless @_ |
|
674
|
0 |
21 |
if &DEBUG() |
|
678
|
17 |
4 |
ref $code eq 'CODE' ? : |
|
685
|
75 |
638 |
@_ && ref $_[0] eq 'HASH' ? : |
|
691
|
0 |
4967 |
if &DEBUG() |
|
693
|
4966 |
1 |
ref $code eq 'CODE' ? : |
|
700
|
91 |
1 |
@_ && ref $_[0] eq 'HASH' ? : |
|
705
|
0 |
97 |
if &DEBUG() |
|
706
|
3 |
94 |
unless ref $code eq "CODE" |
|
718
|
74 |
442 |
@_ && ref $_[0] eq 'HASH' ? : |
|
719
|
0 |
516 |
if &DEBUG() |
|
731
|
219 |
0 |
$arg eq 1 ? : |
|
|
0 |
219 |
$arg eq 0 ? : |
|
752
|
2 |
1 |
keys %{$_[0]{'symbols'};} ? : |
|
757
|
0 |
98 |
unless _autoload($self->{'name'}) |
|
796
|
31 |
0 |
@_ == 1 ? : |
|
800
|
26 |
5 |
unless ref $args |
|
805
|
26 |
5 |
if ref $args eq "ARRAY" |
|
809
|
0 |
31 |
unless ref $args eq "HASH" |
|
812
|
0 |
31 |
if &DEBUG() |
|
832
|
649 |
5741 |
unless (defined ${$class . "::" . "BADGER_LOADED";} or scalar grep({not /::$/;} keys %$symbols) > 1) |
|
836
|
0 |
649 |
if &DEBUG() |
|
839
|
22 |
627 |
if $@ |
|
850
|
0 |
0 |
if scalar grep({not /::$/;} keys %$symbols) == 1 and exists $symbols->{'import'} |