line |
true |
false |
branch |
31
|
0 |
291 |
if @_ < 1 |
|
0 |
291 |
if @_ > 1 and (@_ - 1) % 2 |
|
17 |
274 |
exists ${__rest}{'_scope'} ? : |
|
0 |
291 |
if keys %{__rest} |
32
|
280 |
11 |
defined $name ? : |
41
|
0 |
1 |
if @_ < 2 |
|
0 |
1 |
if @_ > 2 |
47
|
3 |
9 |
if ($op->{'type'} eq ":OP-LOOP" or $op->{'type'} eq ":OP-COND") |
51
|
2 |
1 |
if ($model eq "JSON" and $op->{'type'} eq ":OP-COND") |
52
|
1 |
1 |
ref $_->[1] eq 'SCALAR' ? : |
60
|
0 |
1 |
if @_ < 4 |
|
0 |
1 |
if @_ > 4 |
61
|
0 |
1 |
unless $repr_version <= 1 |
66
|
4 |
4 |
if ($type eq "exit") |
72
|
0 |
4 |
unless $type eq "init" |
76
|
3 |
9 |
if ($op->{'type'} eq ":OP-LOOP" or $op->{'type'} eq ":OP-COND") |
77
|
2 |
1 |
if ($model eq "JSON" and $op->{'type'} eq ":OP-COND") |
78
|
1 |
1 |
ref $_->[1] eq 'ARRAY' ? : |
88
|
0 |
749 |
if @_ < 1 |
|
0 |
749 |
if @_ > 1 |
92
|
0 |
10109 |
if @_ < 2 |
|
0 |
10109 |
if @_ > 2 |
93
|
5 |
10104 |
if $str eq "" |
94
|
10018 |
86 |
if (+(my $op = $self->{'code'}[-1])->{'type'} eq ':OP-RAW') { } |
101
|
0 |
9 |
if @_ < 1 |
|
0 |
9 |
if @_ > 1 |
105
|
0 |
34 |
if @_ < 2 |
|
0 |
34 |
if @_ > 2 |
106
|
0 |
34 |
if $content =~ /\A(-?>)/u |
108
|
0 |
34 |
if $content =~ /( |