Condition Coverage

blib/lib/Text/Autoformat.pm
Criterion Covered Total %
condition 44 95 46.3


and 3 conditions

line !l l&&!r l&&r condition
188 4 21 5 $lines[-1]{'hang'}->empty && !($2 =~ /\S/)
198 0 15 5 @chunks and $chunks[-1][-1]{'empty'}
283 10 5 2 $lastignored &&= $paras[$index]{'ignore'}
284 10 7 0 $args{'mail'} and /^--\s*$/
317 0 0 0 $trailer and $trailer ne ' '
367 0 0 0 $fieldtype and $fieldtype =~ /rom|let/
419 0 5 0 @paras && $paras[0]{'empty'}
591 0 0 0 !($str =~ /^($gen_abbrev)[^a-z]*\s/i) && $str =~ /[a-z][^a-z]*$term([^a-z]*)\s/ && !($1 =~ /[])]/ && !$brsent)
594 0 0 0 $eos and $trailer

or 2 conditions

line l !l condition
131 0 5 $args{'justify'} || ''

or 3 conditions

line l !l&&r !l&&!r condition
113 0 0 6 defined $text || ref $_
6 0 0 not defined $text || ref $_ or overload::Method($_, '""')
144 3 1 1 $args{'all'} ||= $args{'mail'}
198 0 0 25 $line->{'separator'} or $line->{'quoter'} ne $chunks[-1][-1]{'quoter'}
0 5 20 $line->{'separator'} or $line->{'quoter'} ne $chunks[-1][-1]{'quoter'} or $line->{'empty'}
5 5 15 $line->{'separator'} or $line->{'quoter'} ne $chunks[-1][-1]{'quoter'} or $line->{'empty'} or @chunks and $chunks[-1][-1]{'empty'}
217 0 7 8 not $args{'autocentre'} or @$chunk < 2
7 8 0 not $args{'autocentre'} or @$chunk < 2 or $chunk->[0]{'hang'}
234 0 0 0 $diffpre ||= $length[$l - 1][0] != $length[$l][0]
255 15 0 15 $first or $line->{'quoter'} ne $paras[-1]{'quoter'}
15 0 15 $first or $line->{'quoter'} ne $paras[-1]{'quoter'} or $paras[-1]{'separator'}
0 2 13 $first or $line->{'quoter'} ne $paras[-1]{'quoter'} or $paras[-1]{'separator'} or not $line->{'hang'}->empty
404 11 0 2 not $sigs{$sig}{'hanglen'} or $sigs{$sig}{'hanglen'} < $siglen
433 4 0 9 $para->{'hanglen'} || $para->{'hang'}->length
444 13 0 0 $widow_okay or ++$rightindent > $rightslack
455 0 0 13 $para->{'centred'} || $args{'_centred'}
0 0 13 $para->{'centred'} || $args{'_centred'}
467 0 13 0 $args{'expfill'} || $args{'impfill'} && !$para->{'centred'}
468 0 13 0 $firsttext ||= $newtext
471 5 8 0 $para->{'empty'} || length $widow >= $args{'widow'}
534 0 0 0 $entities->{$_} || $_
537 0 0 0 $other_entities->{$_} || $_