Branch Coverage

blib/lib/Health/BladderDiary/GenTable.pm
Criterion Covered Total %
branch 34 104 32.6


line true false branch
38 1 1 if ($args{'entries'} =~ /\S\R\R+\S/) { }
62 0 6 unless $uentry =~ s/\A(\d\d)[:.]?(\d\d)(?:-(\d\d)[:.]?(\d\d))?\s*//
65 0 6 unless $uentry =~ s/(\w+):?\s*//
68 2 4 if ($event eq 'u' or $event eq 'urin') { }
2 2 elsif ($event eq 'd') { }
0 2 elsif ($event eq 'c') { }
71 0 6 unless $event =~ /\A(drink|eat|poop|urinate|comment)\z/
91 0 6 unless ($k =~ /\A(vol|type|comment|urgency|color)\z/)
97 6 24 if (defined $kv{$k})
102 4 2 if $uentry =~ /\b(\d+)ml\b/
103 0 6 if $uentry =~ /\bv(\d+)\b/
104 2 4 if $uentry =~ /\bu([0-9]|10)\b/
105 2 4 if $uentry =~ /\bc([0-6](?:\.5)?)\b/
106 2 0 if ($1 == 0) { }
0 0 elsif ($1 == 0.5) { }
0 0 elsif ($1 == 1) { }
0 0 elsif ($1 == 1.5) { }
0 0 elsif ($1 == 2) { }
0 0 elsif ($1 == 2.5) { }
0 0 elsif ($1 == 3) { }
0 0 elsif ($1 == 4) { }
0 0 elsif ($1 == 5) { }
0 0 elsif ($1 == 6) { }
118 4 2 if ($event eq 'drink') { }
0 2 elsif ($event eq 'eat') { }
2 0 elsif ($event eq 'urinate') { }
120 0 4 unless defined $parsed_entry->{'vol'}
126 0 2 unless defined $parsed_entry->{'vol'}
128 0 2 $parsed_entry->{'comment'} ? :
141 0 6 unless $res->[0] == 200
145 4 2 if ($event eq 'drink') { }
0 2 elsif ($event eq 'eat') { }
2 0 elsif ($event eq 'urinate') { }
155 2 0 if ($args{'_raw'})
163 0 0 if ($args{'yesterday_last_urination_entry'})
166 0 0 unless $res->[0] == 200
169 0 0 unless ($event eq 'urinate')
178 0 0 $yesterday_last_urination_parsed_entry ? :
183 0 0 @intakes ? :
184 0 0 @urinations ? :
186 0 0 if defined $hi and $hi < $h
187 0 0 if defined $hu and $hu < $h
191 0 0 unless @intakes or @urinations
194 0 0 $h + 1 <= 23 ? :
202 0 0 if (defined $entry->{'vol'})
218 0 0 if (defined $entry->{'vol'})
224 0 0 if (defined $prev_utime)
225 0 0 $prev_utime > $entry->{'_time'} ? :
229 0 0 defined $prev_utime ? :
237 0 0 if $h >= 24
249 0 0 $num_drink ? :
0 0 $num_urinate ? :