| line |
true |
false |
branch |
|
23
|
0 |
11 |
unless ref $group eq 'HASH' |
|
25
|
11 |
0 |
unless ref $$group{'name'} eq 'ARRAY' |
|
28
|
1 |
9 |
unless (defined $$group{'no_strict'} or defined $$group{'props'}) |
|
42
|
10 |
1 |
if (@group_props) |
|
59
|
0 |
40 |
if defined $$group{'pre_process'} |
|
63
|
12 |
13 |
$tool =~ /^Package/ ? : |
|
|
15 |
25 |
$tool =~ /^Class/ ? : |
|
65
|
2 |
38 |
if (my $def = $$group{'default'} and not keys %$hash) |
|
71
|
0 |
2 |
unless ref $dprops eq 'HASH' |
|
75
|
10 |
30 |
if ($init) |
|
80
|
6 |
34 |
if (@_) |
|
81
|
0 |
6 |
if (ref $_[0] eq 'HASH') { } |
|
|
2 |
4 |
elsif (@_ == 1) { } |
|
|
4 |
0 |
elsif (not @_ % 2) { } |
|
86
|
1 |
1 |
ref $_[0] eq 'ARRAY' ? : |
|
88
|
2 |
3 |
if (my $m = $s->can($p) and grep /^$p$/, @group_props) { } |
|
94
|
3 |
0 |
if ($$group{'no_strict'}) { } |
|
102
|
1 |
1 |
wantarray ? : |
|
111
|
6 |
1 |
if (my $m = $s->can($p) and grep /^$p$/, @group_props) { } |
|
117
|
1 |
0 |
if ($$group{'no_strict'}) { } |
|
126
|
0 |
38 |
wantarray ? : |