Branch Coverage

lib/Text/FixEOL.pm
Criterion Covered Total %
branch 64 64 100.0


line true false branch
103 296 26 if ($proto_ref) { }
25 1 elsif ($proto) { }
113 4 318 if (1 < @_) { }
301 17 elsif (1 == @_) { }
117 300 1 if ($parm_type eq 'HASH') { }
129 302 2 if ($properties{'eol'})
133 298 6 if ($properties{'eof'})
137 298 6 if ($properties{'fixlast'})
142 2 302 if (0 < @extra_properties)
220 2 422 unless (1 == @_)
228 363 59 if ($eol_mode ne 'asis')
232 421 1 if ($fix_last eq 'yes')
234 6 415 if ($string =~ s/(\032+)$//s)
237 358 63 if ($string ne '' and $eol_mode ne 'asis') { }
238 4 354 unless ($string =~ /\012$/s)
243 4 59 if ($eol_mode ne 'asis')
251 357 65 if ($eof_handling eq 'remove') { }
2 124 elsif ($eof_handling eq 'add' and not $string =~ /\032$/s) { }
258 363 59 if ($eol_mode ne 'asis')
271 59 367 if ($eol_handling =~ /^literal:(.+)$/s) { }
311 127 1085 if $property eq 'fixlast' and $platform_name =~ /^(yes|no)$/
312 68 1017 if $property eq 'eof' and $platform_name =~ /^(asis|remove|add)$/
314 236 781 if ($platform_name eq 'platform')
319 236 781 unless (defined $platform_defaults)
323 1 1016 unless (defined $property_value)
338 1 362 unless defined $string
341 32 330 unless $string =~ /\015/s
344 24 306 unless ($string =~ /\012/s)
350 36 78 unless ($string =~ /\015\012/s or $string =~ /\012\015/s)
358 384 378 if defined $replacement_map{$eol_mode}
386 1290 1886 if (0 == @_) { }
1885 1 elsif (1 == @_) { }