| line |
true |
false |
branch |
|
21
|
0 |
6 |
unless defined $sub |
|
25
|
0 |
6 |
if (ref $sub eq 'CODE') { } |
|
|
6 |
0 |
elsif (ref $sub eq '') { } |
|
30
|
0 |
6 |
unless defined $package |
|
35
|
0 |
6 |
unless defined $subref and ref $subref eq 'CODE' |
|
42
|
0 |
6 |
unless defined $params{'action'} |
|
50
|
2 |
4 |
if (exists $params{'context'}) { } |
|
51
|
0 |
2 |
unless (defined $params{'context'} and $params{'context'} eq 'list' || $params{'context'} eq 'scalar' || $params{'context'} eq 'void' || $params{'context'} eq 'novoid' || $params{'context'} eq 'any') |
|
68
|
0 |
6 |
if ($context eq 'list') { } |
|
|
0 |
6 |
elsif ($context eq 'scalar') { } |
|
|
2 |
4 |
elsif ($context eq 'novoid') { } |
|
|
0 |
4 |
elsif ($context eq 'void') { } |
|
69
|
0 |
0 |
ref $sub eq 'CODE' ? : |
|
81
|
0 |
0 |
ref $sub eq 'CODE' ? : |
|
94
|
0 |
2 |
ref $sub eq 'CODE' ? : |
|
104
|
0 |
0 |
ref $sub eq 'CODE' ? : |
|
117
|
3 |
3 |
if ($pre_name eq '_') { } |
|
120
|
0 |
3 |
ref $sub eq 'CODE' ? : |
|
129
|
0 |
3 |
ref $sub eq 'CODE' ? : |
|
156
|
5 |
4 |
if ($post_name eq '_') { } |
|
159
|
0 |
8 |
ref $sub eq 'CODE' ? : |
|
168
|
0 |
4 |
ref $sub eq 'CODE' ? : |
|
177
|
0 |
6 |
$context eq 'list' ? : |
|
184
|
0 |
6 |
if ($error) |
|
187
|
0 |
6 |
if (ref $sub eq 'CODE') { } |
|
203
|
2 |
2 |
unless do {
@PARAM == 2
} |
|
|
0 |
0 |
if @RETURN |
|
|
0 |
4 |
if (wantarray) { } |
|
|
4 |
0 |
elsif (defined wantarray) { } |
|
|
0 |
4 |
unless do {
not $VOID
} |
|
|
0 |
4 |
unless do {
$RETURN > 0
} |
|
|
0 |
4 |
unless do {
$PARAM[0] * $PARAM[1] - 1e-12 < $RETURN
} |
|
|
0 |
4 |
unless do {
$PARAM[0] * $PARAM[1] + 1e-12 > $RETURN
} |
|
|
1 |
3 |
unless (defined wantarray) |
|
|
1 |
2 |
unless do {
$PARAM[0] > 0
} |
|
|
0 |
1 |
if @RETURN |
|
|
1 |
3 |
if (wantarray) { } |
|
|
3 |
1 |
elsif (defined wantarray) { } |
|
|
3 |
1 |
unless $VOID |
|
|
2 |
4 |
unless do {
$RETURN > $PARAM[0] unless $VOID
} |
|
|
1 |
3 |
unless do {
$PARAM[0] >= 0
} |
|
|
0 |
0 |
if @RETURN |
|
|
0 |
4 |
if (wantarray) { } |
|
|
3 |
1 |
elsif (defined wantarray) { } |
|
|
3 |
1 |
unless $VOID |
|
|
2 |
2 |
unless do {
$RETURN <= $PARAM[0] unless $VOID
} |
|
210
|
0 |
12 |
if (not defined $conditions) { } |
|
|
5 |
7 |
elsif (ref $conditions eq '') { } |
|
|
3 |
4 |
elsif (ref $conditions eq 'ARRAY') { } |
|
|
4 |
0 |
elsif (ref $conditions eq 'HASH') { } |
|
229
|
8 |
7 |
if ($name eq '_') { } |
|
231
|
0 |
11 |
if ref $cond ne '' |
|
236
|
0 |
7 |
if ref $$conditions{$name} ne '' |