Condition Coverage

blib/lib/Text/Reform.pm
Criterion Covered Total %
condition 81 147 55.1


and 3 conditions

line !l l&&!r l&&r condition
89 8 1 1 defined $except and $_[0] =~ /\A (.{1,$max}) ($except .*)/msx
8 0 1 defined $except and $_[0] =~ /\A ($except) (.*)/msx
179 5 131 25 $$ref =~ /\S/ and $fmtnum > 2
188 2 0 2 $$config{'numeric'} =~ /\bSkipNaN\b/i and $$ref =~ /\S/
216 0 170 11 not $$config{'fill'} and $$ref =~ s/\A[ \t]*\n//
225 131 39 0 $text and $match =~ /\n/
254 71 76 12 not $filled and $rem > 0
147 5 7 not $filled and $rem > 0 and $$ref =~ /\S/
81 1 6 not $filled and $rem > 0 and $$ref =~ /\S/ and length $text == 0
261 130 27 2 $text =~ / / and $_[0] eq 'J'
157 0 2 $text =~ / / and $_[0] eq 'J' and $$ref =~ /\S/
27 0 2 $text =~ / / and $_[0] eq 'J' and $$ref =~ /\S/ and $filled != 2
379 23 1 0 defined $$config{'pagenum'} and ref $$config{'pagenum'} ne 'SCALAR'
389 0 1 0 $^W and not $std_config{'_used'}
400 0 33 23 @_ and ref $_[0] eq 'HASH'
438 113 24 0 $ref[$nextarg] eq 'HASH' and $$next{'cols'}
24 1 1 $ref[$nextarg] ne 'HASH' and $ref[$nextarg] ne 'SCALAR'
478 53 0 2 $header and substr($header, -1, 1) ne "\n"
481 53 0 2 $footer and substr($footer, -1, 1) ne "\n"
508 0 59 0 @parts and $parts[-1] eq "\n"
518 387 1 142 $part =~ /($fieldmark)/ and substr($part, 0, 2) ne '~~'
571 139 9 5 $$config{'pagelen'} and $linecount >= $$config{'pagelen'}
574 0 0 5 $^W and $$config{'pagelen'}
0 5 0 $^W and $$config{'pagelen'} and $linecount > $$config{'pagelen'}
579 2 0 3 $header and substr($header, -1, 1) ne "\n"
585 2 0 3 $footer and substr($footer, -1, 1) ne "\n"
603 52 1 1 $hfcount and $linecount == $hfcount
1 49 3 $linecount and $$config{'pagelen'}
618 0 0 2 $lastfooter and substr($lastfooter, -1, 1) ne "\n"
624 2 0 0 $footerdiff > 0 and $text =~ /($tail\Q$prevfooter\E)\Z/m
632 0 0 0 $lastheader and substr($lastheader, -1, 1) ne "\n"
635 0 0 0 $lastfooter and substr($lastfooter, -1, 1) ne "\n"
717 3 2 5 -1 - $i < length $rdelim and -1 - $i < length $tagargs

or 2 conditions

line l !l condition
124 0 0 $_[0] || ''
160 20 3 $2 || ''
309 0 0 $$data{'left'} ||= ''
310 0 0 $$data{'center'} || ''
311 0 0 $$data{'right'} ||= ''
493 1 59 $ref[$startidx] || ''
502 0 0 ${$_[$startidx++];} || ''
59 0 ${$_[$startidx++];} || ''
712 2 5 $1 || ''

or 3 conditions

line l !l&&r !l&&!r condition
129 0 0 0 'TeX::Hyphen'->new($file || undef) || croak("Can't open hyphenation file $file")
198 9 4 10 $$config{'numeric'} =~ /\bAllPlaces\b/i or $num =~ /\Q$decimal\E\d\d{$dlen,}$/
308 0 0 0 $$data{'width'} ||= $pagewidth
310 0 0 0 $$data{'centre'} ||= $$data{'center'} || ''
320 0 0 0 @l or @c
0 0 0 @l or @c or @r
451 0 0 0 ref $cols || "'${cols}'"
453 0 0 0 ref $data || "'${data}'"
491 60 0 54 $startidx < @_ or @format_stack
728 0 0 7 $_[2] || "$ldelim/$tag$rdelim"