Branch Coverage

blib/lib/Lingua/IT/Conjugate.pm
Criterion Covered Total %
branch 75 184 40.7


line true false branch
83 54 373 if ($in_pod)
84 1 53 if /^=cut/
85 53 1 if $in_pod
87 46 328 if /^\s*#/ or /^\s*$/
90 6 322 if (/^\[(.*)\]/) { }
93 24 298 if ($sezione eq 'Desinenze') { }
7 291 elsif ($sezione eq 'Composti') { }
10 281 elsif ($sezione eq 'Regolarizza') { }
14 267 elsif ($sezione eq 'Ausiliari_essere') { }
21 246 elsif ($sezione eq 'Prefissi') { }
245 1 elsif ($sezione eq 'Irregolarita') { }
95 3 21 unless exists $Desinenza{$declinazione}
96 24 0 unless exists $Desinenza{$declinazione}{$tempo}
102 0 21 unless exists $Desinenza{$declinazione}
115 21 0 unless exists $Prefissi{$verbo}
120 33 212 unless exists $Irregolarita{$verbo}
121 106 139 unless exists $Irregolarita{$verbo}{$tempo}
145 3 11 if ($chiamante eq 'coniuga') { }
0 11 elsif ($chiamante eq 'coniugazione') { }
150 9 5 if (defined $opzioni and ref $opzioni eq 'HASH')
165 0 3 if ($$opzioni{'coniuga_sconosciuti'} == 0)
166 0 0 unless (verbo_esistente($verbo))
172 3 0 if (defined $tempo and defined $persona) { }
0 0 elsif (not defined $tempo and defined $persona) { }
0 0 elsif (defined $tempo and not defined $persona) { }
178 0 0 wantarray ? :
183 0 0 wantarray ? :
191 0 0 wantarray ? :
197 1 1 if (exists $Irregolarita{$verbo}{$tempo}{'*'})
198 0 1 if ($Irregolarita{$verbo}{$tempo}{'*'} =~ /^~/) { }
217 0 10 if ($verbo =~ s/si$/e/)
218 0 10 if ($verbo =~ /[ou]re$/)
223 0 0 if (exists $Simile{$prova} or exists $Regolarizza{$prova} or exists $Prefissi{$prova})
233 0 10 if (exists $Simile{$verbo})
238 0 10 if (exists $Regolarizza{$verbo})
240 0 0 if ($tempi eq '*' or $tempi =~ /$tempo/)
245 8 2 if (exists $Irregolarita{$verbo}{$tempo}{$persona})
247 0 8 if defined $prefisso_tema
248 0 8 if ($riflessivo)
255 2 0 if ($verbo =~ /^(.*)$_$/i)
261 2 0 if (defined $coniugazione) { }
262 1 1 if (ref $Desinenza{$coniugazione}{$tempo}) { }
275 0 1 if defined $prefisso_tema
276 0 1 if ($riflessivo)
282 1 0 if ($prefisso =~ /^ausiliare/) { }
284 1 0 if (grep /^$verbo$/, @Ausiliari_essere or $riflessivo) { }
302 0 1 if ($verbo_ausiliare eq 'essere' and $persona > 3)
305 0 1 if defined $prefisso_tema
307 0 1 if ($riflessivo)
319 0 0 if (exists $aggiustamenti{$persona})
333 0 0 if defined $prefisso_tema
334 0 0 if ($riflessivo)
349 0 2 if ($coniugazione eq 'are') { }
2 0 elsif ($coniugazione eq 'ere') { }
350 0 0 if ($tema =~ /[gc]$/ and $desinenza =~ /^[ie]/) { }
0 0 elsif ($tema =~ /[gc]i$/ and $desinenza =~ /^[ie]/) { }
0 0 elsif ($tema =~ /i$/ and $desinenza =~ /^i/) { }
359 0 2 if ($tema =~ /g(n|li)$/) { }
0 2 elsif ($tema =~ /n$/ and $desinenza =~ /^[oa]/) { }
0 2 elsif ($tema =~ /[gnr]g$/ and $tempo eq 'passato_remoto' and $persona == 1 || $persona == 3 || $persona == 6) { }
0 2 elsif ($tema =~ /[nr]d$/ and $tempo eq 'passato_remoto' and $persona == 1 || $persona == 3 || $persona == 6) { }
0 2 elsif ($tema =~ /isc$/ and $tempo eq 'presente' || $tempo eq 'congiuntivo_presente' and $persona == 4 || $persona == 5) { }
0 2 elsif ($tema =~ /[aeious][cg]$/ and $tempo eq 'participio') { }
1 2 elsif ($tema =~ /([^aeiou])([^aeiou])$/ and $tempo eq 'participio') { }
360 0 0 if ($tempo eq 'participio') { }
0 0 elsif ($tempo eq 'passato_remoto' and $persona == 1 || $persona == 3 || $persona == 6) { }
0 0 elsif ($tempo eq 'presente') { }
0 0 elsif ($tempo eq 'congiuntivo_presente') { }
361 0 0 $1 eq 'n' ? :
370 0 0 if ($persona == 1 or $persona == 6) { }
373 0 0 if $tema =~ /i$/
376 0 0 if ($desinenza =~ /^a/) { }
379 0 0 if $tema =~ /i$/
388 0 0 $1 eq 'g' ? :
395 0 0 $1 eq 'n' ? :
411 0 1 if ($seconda eq 'g') { }
0 1 elsif ($prima eq 'm' and $seconda eq 'p') { }
0 1 elsif ($prima eq 'r' and $seconda eq 'd') { }
0 2 elsif ($prima eq 'n' and $seconda eq 'd') { }
412 0 0 if $prima eq $seconda
424 0 0 if ($tema =~ /o..$/) { }
0 0 elsif ($tema =~ /[ue]..$/) { }
445 0 6 if ($opzioni{'pronomi'}) { }
461 0 0 if ($verbo =~ /[ou]re$/)
466 0 0 if (exists $Simile{$prova} or exists $Regolarizza{$prova} or exists $Prefissi{$prova})
472 0 0 if (open VERBI, "$FindBin::RealBin/verbi") { }
476 0 0 if $_ eq $verbo
490 0 0 if ($$opzioni{'coniuga_sconosciuti'} == 0)
491 0 0 unless (verbo_esistente($verbo))
504 0 0 $$opzioni{'pronomi'} == 1 ? :
0 0 $$opzioni{'pronomi'} == 1 ? :
513 0 0 unless defined $fill