Branch Coverage

blib/lib/SpeL/Wizard.pm
Criterion Covered Total %
branch 48 114 42.1


line true false branch
37 0 38 ref $class ? :
64 37 1 unless (-r $auxFileName)
65 37 0 if $verbosity >= 2
74 1 0 if ($test)
87 0 37 if defined $debug
92 0 37 unless (-r $spelIdxFileName)
93 0 0 if $verbosity >= 2
102 37 192 unless ($line =~ /(?:^format)|(?:^audiodir)|(?:^server)|(?:^chunkdir)|(?:^mac)|(?:^env)|(?:^language)/)
113 0 37 unless $nrLines
148 37 192 if ($label eq "format")
150 37 0 if (-r "$FindBin::Bin/$tts") { }
159 37 155 if ($label eq "language")
163 0 37 unless $SpeL::I18n::lh = "SpeL::I18n"->get_handle($languagetag)
167 0 37 unless exists $this->{'config'}{'voices'}{$language}
172 37 118 if ($label eq "audiodir")
178 0 118 if ($label eq "server")
183 37 81 if ($label eq "chunkdir")
188 0 81 if ($label eq "envpp")
202 15 66 if ($label eq "macpp")
217 29 37 if ($label eq "macad")
228 0 37 if ($label eq "envad")
243 0 37 if defined $debug and $debug ne $filetoread
246 0 37 unless defined $format
248 0 37 unless defined $audiodir
250 0 37 unless defined $chunkdir
252 0 37 unless defined $language
263 37 0 if $verbosity >= 1
265 37 0 if $verbosity >= 1
272 37 0 if $verbosity >= 1
280 1 36 if (/^title$/)
285 0 36 if (/^author$/)
290 0 36 if (/^part\s+(.*)/)
295 0 36 if (/^chapter\s+(.*)/)
304 1 35 if (/^((?:sub)*section)\s+(.*)/)
326 0 35 if (/^((?:sub)?paragraph)$/)
352 0 35 if (/^footnote\s+(.*)/)
358 37 0 if $test
371 37 0 if ($test) { }
383 0 0 if (-r $trfilename)
389 0 0 unless defined $replace
396 0 0 if (defined $text) { }
410 0 0 if ($MD5SumFile->open("<$fullFilePath.md5")) { }
414 0 0 unless defined $md5sum
421 0 0 if ($md5sum ne $text_md5_hex) { }
423 0 0 if $verbosity >= 1
437 0 0 unless IPC::Run::run($command, ">", \$out)
441 0 0 if (-e "$fullFilePath.$format") { }
451 0 0 if $verbosity >= 1
464 0 0 $server eq 'local' ? :
467 0 0 unless $ran_at_least_once
472 0 0 if $verbosity >= 1
485 0 0 if ($server eq 'local') { }
513 0 0 unless (exists $chunks->{$basename})
515 0 0 if -e $file
523 0 0 $direction eq '<' ? :
0 111 unless $file->open("$direction$fileName")
533 0 0 unless $file->open(">$fileName")