line |
true |
false |
branch |
75
|
0 |
22 |
unless eval {
|
77
|
22 |
0 |
unless $self->_derive_spell_command_line
|
87
|
0 |
0 |
unless $self->_run_spell_command($test_code)
|
103
|
0 |
0 |
unless $words
|
105
|
0 |
0 |
unless @{$words;}
|
116
|
0 |
22 |
unless (@words)
|
119
|
22 |
0 |
unless ("File::Spec"->file_name_is_absolute($words[0]))
|
122
|
22 |
0 |
unless ($words[0] and -x $words[0])
|
195
|
0 |
0 |
unless open my $infh, "<", \$code
|
199
|
0 |
0 |
unless close $infh
|
200
|
0 |
0 |
unless close $outfh
|
201
|
0 |
0 |
unless -s $outfile
|
206
|
0 |
0 |
unless open my $aspell_out_fh, "-|", "$command_line < $outfile"
|
210
|
0 |
0 |
unless close $aspell_out_fh
|
219
|
0 |
0 |
unless (eval {
|
221
|
0 |
0 |
if ($Perl::Critic::Policy::Documentation::PodSpelling::EVAL_ERROR and not ref "Perl::Critic::Exception::Fatal::Generic"->caught)
|
225
|
0 |
0 |
ref $Perl::Critic::Policy::Documentation::PodSpelling::EVAL_ERROR ? :
|
241
|
0 |
0 |
unless my $file_name = $self->_get_stop_words_file
|
244
|
0 |
0 |
unless (open my $handle, "<", $file_name)
|
247
|
0 |
0 |
if (my $word = _word_from_line($line))
|
252
|
0 |
0 |
unless close $handle
|