Branch Coverage

blib/lib/Speech/Synthesis.pm
Criterion Covered Total %
branch 16 180 8.8


line true false branch
254 0 9 unless $@
256 0 9 unless $@
258 0 9 unless $@
260 0 9 unless $@
262 9 0 unless $@
270 0 1 unless exists $params{'engine'} and grep {$_ eq $params{'engine'};} 'Speech::Synthesis'->InstalledEngines
272 0 1 if ($params{'engine'} eq 'MSAgent' or $params{'engine'} eq 'SAPI4') { }
0 1 elsif ($params{'engine'} eq 'SAPI5') { }
0 1 elsif ($params{'engine'} eq 'MacSpeech') { }
1 0 elsif ($params{'engine'} eq 'Festival') { }
276 0 0 unless $params{'engine'} ne 'MSAgent'
319 0 3 unless exists $params{'engine'} and grep {$_ eq $params{'engine'};} 'Speech::Synthesis'->InstalledEngines
321 0 3 if ($params{'engine'} eq 'MSAgent' or $params{'engine'} eq 'SAPI4') { }
0 3 elsif ($params{'engine'} eq 'SAPI5') { }
0 3 elsif ($params{'engine'} eq 'MacSpeech') { }
3 0 elsif ($params{'engine'} eq 'Festival') { }
328 0 0 if $params{'engine'} eq 'MSAgent' and not $lang
330 0 0 if (exists $params{'language'})
332 0 0 unless $params{'language'} eq lc($l) . '_' . uc($r)
334 0 0 $object->Gender($i) == 2 ? :
0 0 $object->Gender($i) == 1 ? :
336 0 0 if (exists $params{'gender'})
338 0 0 unless $gen eq $params{'gender'}
358 0 0 if ($lang)
361 0 0 if (exists $params{'language'})
363 0 0 unless $params{'language'} eq lc($l) . '_' . uc($r)
367 0 0 if (exists $params{'gender'})
369 0 0 unless $gender eq $params{'gender'}
392 0 0 if (exists $params{'language'})
394 0 0 unless $thislang eq $params{'language'}
397 0 0 $gender == 1 ? :
0 0 $gender == 0 ? :
398 0 0 if (exists $params{'gender'})
400 0 0 unless $gen eq $params{'gender'}
417 3 0 unless ref $fest
434 0 0 if ($p eq 'nil') { }
450 0 0 if exists $$DIALECTS{$h{'dialect'}}
451 0 0 if country2code($h{'dialect'})
466 0 0 unless exists $params{'engine'} and $params{'engine'} eq 'MSAgent'
468 0 0 if defined $agent
478 0 0 unless (exists $params{'engine'})
483 0 0 unless (grep {$params{'engine'} eq $_;} ('MSAgent', 'SAPI4', 'SAPI5', 'MacSpeech', 'Festival'))
490 0 0 exists $params{'async'} ? :
491 0 0 if ($$self{'_engine'} eq 'MSAgent') { }
0 0 elsif ($$self{'_engine'} eq 'Festival') { }
493 0 0 unless (exists $params{'language'} and exists $params{'avatar'})
495 0 0 unless exists $params{'language'}
496 0 0 unless exists $params{'avatar'}
514 0 0 unless exists $$self{'_engine'}
515 0 0 if ($$self{'_engine'} eq 'MSAgent') { }
0 0 elsif ($$self{'_engine'} eq 'SAPI4') { }
0 0 elsif ($$self{'_engine'} eq 'SAPI5') { }
0 0 elsif ($$self{'_engine'} eq 'MacSpeech') { }
0 0 elsif ($$self{'_engine'} eq 'Festival') { }
541 0 0 unless exists $$self{'_engine'}
544 0 0 if ($$self{'_engine'} eq 'MSAgent') { }
0 0 elsif ($$self{'_engine'} eq 'SAPI4') { }
0 0 elsif ($$self{'_engine'} eq 'SAPI5') { }
0 0 elsif ($$self{'_engine'} eq 'MacSpeech') { }
0 0 elsif ($$self{'_engine'} eq 'Festival') { }
570 0 0 if defined $id
571 0 0 if defined $id
579 0 0 if ($$self{'_engine'} eq 'MSAgent') { }
0 0 elsif ($$self{'_engine'} eq 'SAPI4') { }
0 0 elsif ($$self{'_engine'} eq 'SAPI5') { }
0 0 elsif ($$self{'_engine'} eq 'MacSpeech') { }
0 0 elsif ($$self{'_engine'} eq 'Festival') { }
595 0 0 unless ($$self{'_async'})
603 0 0 unless ($$self{'_async'})
608 0 0 if ($$self{'_async'}) { }
611 0 0 unless $buf
0 0 if ($$self{'_fest'}->write_pending)
615 0 0 unless $$self{'_fest'}->server_eval_sync('(SayText "' . $text . '")', {'LP', sub { } , 'WV', sub { } })
623 0 0 if $$self{'_engine'} eq 'MSAgent'
624 0 0 if $$self{'_engine'} eq 'SAPI4'
625 0 0 if $$self{'_engine'} eq 'SAPI5'
626 0 0 if $$self{'_engine'} eq 'MacSpeech'
627 0 0 if $$self{'_engine'} eq 'Festival'
633 0 0 unless $$self{'_engine'} eq 'MSAgent'
634 0 0 if (exists $$self{'_agent'} and $$self{'_loadedchar'} ne $$self{'_avatar'}) { }
655 0 0 if exists $$self{'_voice'}
666 0 0 unless $$self{'_engine'} eq 'SAPI4'
670 0 0 if $$self{'_sapi4'}->ModeID($i) eq $$self{'_voice'}
678 0 0 unless $$self{'_engine'} eq 'SAPI5'
683 0 0 if $tokens->Item($i)->Id eq $$self{'_voice'}
690 0 0 unless $$self{'_engine'} eq 'MacSpeech'
697 0 0 if $id eq $$self{'_voice'}
704 0 0 unless $$self{'_engine'} eq 'Festival'
706 0 0 unless $$self{'_fest'}->server_eval_sync('(voice.select "' . $$self{'_voice'} . '")', {'LP', sub { } , 'WV', sub { } })
712 0 0 if (exists $$self{'_agent'})