line |
true |
false |
branch |
463
|
98 |
10 |
if (ref $proto) |
471
|
98 |
0 |
if ($self->{'compiled'}) |
519
|
0 |
62 |
unless $self->{'compiled'} |
532
|
8 |
2607 |
if $return eq 'halt' |
534
|
36 |
2571 |
if ($return =~ /^recurse\.([\-\w][\-\w ]*)/) { } |
|
624 |
1947 |
elsif ($return =~ /^loop\.([^\.]+)\.([^\.]+)/) { } |
|
576 |
1371 |
elsif ($return =~ /^endloop\.([^\.]+)/) { } |
|
0 |
1371 |
elsif ($return =~ /^break/) { } |
535
|
0 |
36 |
unless exists $recipes->{$1} |
557
|
45 |
579 |
unless ($self->{'ingredients'}{$ingr}->value) |
573
|
54 |
2553 |
if $exec_pos > $max_pos |
576
|
26 |
36 |
if ($self->{'serves'}) |
578
|
0 |
35 |
if $serve > $#{$$self{'dishes'};} |
611
|
0 |
0 |
defined $ingredient ? : |
|
0 |
0 |
defined $sub ? : |
|
0 |
162 |
unless defined $ingredient and exists $self->{'ingredients'}{$ingredient} |
628
|
36 |
62 |
if @_ |
644
|
172 |
23 |
if @{$self->{'bowls'};} >= $no |
665
|
10 |
12 |
if @{$self->{'dishes'};} >= $no |
683
|
0 |
19 |
if @_ |
699
|
0 |
10 |
if $self->{'compiled'} |
705
|
0 |
10 |
unless @ingredients |
714
|
55 |
1 |
if (s/^[ ]*(\d+)[ ]//) { } |
722
|
0 |
112 |
if (s/^\Q$type\E[ ]//) |
730
|
37 |
615 |
if $meas eq '' |
732
|
23 |
592 |
if (s/^\Q$meas\E[ ]//) |
739
|
0 |
56 |
unless /[ ]*([\-\w][\- \w]*)[ ]*$/ |
767
|
1286 |
212 |
unless @res |
769
|
5 |
207 |
if ($res[0] eq 'verb') { } |
|
5 |
202 |
elsif ($res[0] eq 'until_verbed') { } |
776
|
0 |
5 |
unless exists $self->{'loops'}{$verb} |
786
|
0 |
212 |
unless ref $step eq 'ARRAY' |
790
|
0 |
10 |
if (grep {not exists $self->{'loops'}{$_}{'end'};} keys %{$$self{'loops'};}) |