line |
true |
false |
branch |
232
|
2 |
1 |
if $books_cb |
233
|
2 |
1 |
if $verses_cb |
346
|
4 |
18 |
unless $name |
351
|
1 |
17 |
unless $bible |
371
|
5 |
0 |
$1 == 4 ? : |
|
20 |
5 |
$1 == 3 ? : |
|
140 |
25 |
$1 == 2 ? : |
|
140 |
165 |
$1 == 1 ? : |
|
305 |
881 |
$book_str =~ s/^(\d)\s//u ? : |
396
|
1181 |
189 |
if length $unique >= $self->minimum_book_length and !@prefix && scalar grep({index($_, $unique) == 0;} @$canonical) == 1 || @prefix && scalar grep({index($_, $prefix[-1] . ' ' . $unique) == 0;} @$canonical) == 1 |
410
|
1676 |
4377 |
@prefix ? : |
466
|
0 |
213 |
if $start == 0 |
467
|
0 |
213 |
if $stop == 0 |
471
|
11 |
202 |
if $x < $start |
478
|
77 |
112 |
$start =~ s/(\d+)://u ? : |
479
|
19 |
170 |
$stop =~ s/(\d+)://u ? : |
481
|
1 |
111 |
if (not $start_ch and $stop_ch and $start > $stop_ch) |
489
|
2 |
7 |
if ($start_ch and $stop_ch and $start and $stop and $start_ch == $stop_ch) |
490
|
1 |
1 |
if ($start <= $stop) { } |
505
|
101 |
88 |
if (not $start_ch || $stop_ch) { } |
|
71 |
17 |
elsif ($start_ch and not $stop_ch) { } |
|
10 |
7 |
elsif (not $start_ch and $stop_ch) { } |
|
7 |
0 |
elsif ($start_ch and $stop_ch) { } |
520
|
4 |
2 |
if ($start >= $stop and $stop > $start_ch and not $skip_chapter_assumption_check) |
525
|
4 |
67 |
$stop_ch ? : |
551
|
3 |
4 |
if ($start_ch >= $stop_ch) |
556
|
11 |
13 |
$reversed ? : |
562
|
3 |
4 |
$stop_ch - $start_ch > 1 ? : |
580
|
0 |
185 |
unless $compress |
586
|
0 |
25 |
unless @input |
589
|
1 |
24 |
$self->require_book_ucfirst ? : |
|
1 |
24 |
$self->require_verse_match ? : |
596
|
1 |
24 |
$self->require_book_ucfirst ? : |
603
|
176 |
341 |
unless $ref |
609
|
129 |
212 |
$ref =~ s/^((?i:\W|\bdna\b|\bro\b|&)+)//u ? : |
618
|
341 |
155918 |
if ($ref =~ /$_->[0]/u) |
630
|
164 |
177 |
if ($ref =~ /([\d:,;\s\-]+)$/u) |
639
|
152 |
1266 |
if $s eq ":" or $d <= $last_d |
641
|
735 |
683 |
if ($verse_context) { } |
645
|
136 |
599 |
unless @{$numbers->[-1];} > 1 |
649
|
735 |
683 |
$verse_context ? : |
651
|
136 |
1282 |
if $s eq ":" |
652
|
23 |
1395 |
if $s eq ";" |
656
|
340 |
1 |
if (@$numbers or not $self->require_chapter_match) { } |
657
|
164 |
176 |
if @$numbers |
668
|
340 |
517 |
ref $_ ? : |
681
|
4 |
0 |
wantarray ? : |
685
|
19 |
0 |
if ($data or not $self->_cache->{'data'} or not $self->_cache->{'sorting'} && $self->_cache->{'sorting'} == $self->sorting && $self->_cache->{'acronyms'} && $self->_cache->{'acronyms'} == $self->acronyms) |
699
|
214 |
450 |
ref $_ ? : |
701
|
174 |
921 |
ref $_ ? : |
|
921 |
0 |
ref $_ ? : |
714
|
3 |
56 |
if $self->add_detail |
716
|
23 |
20 |
if (ref $_->[1]) { } |
730
|
58 |
1 |
if ($self->sorting) |
732
|
196 |
215 |
unless $_->[1] |
748
|
330 |
597 |
if @verses |
755
|
126 |
132 |
if @$chapters |
765
|
1 |
58 |
if ($self->acronyms) |
772
|
2 |
57 |
if $self->simplify |
774
|
4 |
0 |
if (my $chapters = $_->[1]) |
779
|
18 |
0 |
if $chapter->[1] and join(",", @{$chapter->[1];}) eq join(",", 1 .. $self->_bible_data->{'lengths'}{$book}[$chapter->[0] - 1] || 0) |
785
|
2 |
2 |
if join(",", map({$_->[0];} grep({@$_ == 1;} @$chapters))) eq join(",", 1 .. scalar @{$self->_bible_data->{'lengths'}{$book};}) |
795
|
1 |
58 |
wantarray ? : |
806
|
66 |
11 |
unless $_->[1] |
810
|
0 |
1 |
wantarray ? : |
817
|
74 |
124 |
if (@range) |
825
|
112 |
390 |
if (not $last or $last + 1 != $item) { } |
837
|
86 |
0 |
wantarray ? : |
847
|
72 |
98 |
if ($_->[1]) { } |
851
|
27 |
52 |
if (@buffer) |
860
|
70 |
406 |
if ($_->[1]) { } |
861
|
11 |
59 |
if ($type eq 'verses') { } |
|
11 |
48 |
elsif ($type eq 'runs') { } |
|
11 |
37 |
elsif ($type eq 'chapters') { } |
876
|
208 |
198 |
if ($type eq 'books') { } |
885
|
42 |
30 |
if ($type eq 'books') { } |
902
|
0 |
1 |
wantarray ? : |
907
|
0 |
1 |
wantarray ? : |
912
|
0 |
1 |
wantarray ? : |
917
|
43 |
8 |
wantarray ? : |
926
|
40 |
56 |
ref $_ ? : |
930
|
1 |
1 |
@text > 1 && !wantarray ? : |
|
0 |
2 |
@text > 1 && wantarray ? : |
935
|
0 |
3 |
unless $bible and not ref $bible and length $bible > 0 |
937
|
1 |
2 |
unless $book_data and ref $book_data eq "ARRAY" |
941
|
0 |
40 |
unless ref $_ eq "ARRAY" and not ref $_->[0] and length $_->[0] > 0 and not ref $_->[1] and length $_->[1] > 0 |
948
|
0 |
1 |
if ($verse_data) { } |
962
|
1 |
0 |
if $bible |
967
|
1 |
1 |
unless @books |
985
|
1 |
0 |
if $bibles->[0]{'count'} != $bibles->[-1]{'count'} |