Branch Coverage

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


line true false branch
100 296 26 if ($proto_ref) { }
25 1 elsif ($proto) { }
110 4 318 if (1 < @_) { }
301 17 elsif (1 == @_) { }
114 300 1 if ($parm_type eq 'HASH') { }
126 302 2 if ($properties{'eol'})
130 298 6 if ($properties{'eof'})
134 298 6 if ($properties{'fixlast'})
139 2 302 if (0 < @extra_properties)
217 2 422 unless (1 == @_)
225 363 59 if ($eol_mode ne 'asis')
229 421 1 if ($fix_last eq 'yes')
231 6 415 if ($string =~ s/(\032+)$//s)
234 358 63 if ($string ne '' and $eol_mode ne 'asis') { }
235 4 354 unless ($string =~ /\012$/s)
240 4 59 if ($eol_mode ne 'asis')
248 357 65 if ($eof_handling eq 'remove') { }
2 124 elsif ($eof_handling eq 'add' and not $string =~ /\032$/s) { }
255 363 59 if ($eol_mode ne 'asis')
268 59 367 if ($eol_handling =~ /^literal:(.+)$/s) { }
308 127 1085 if $property eq 'fixlast' and $platform_name =~ /^(yes|no)$/
309 68 1017 if $property eq 'eof' and $platform_name =~ /^(asis|remove|add)$/
311 236 781 if ($platform_name eq 'platform')
316 236 781 unless (defined $platform_defaults)
320 1 1016 unless (defined $property_value)
335 1 362 unless defined $string
338 32 330 unless $string =~ /\015/s
341 24 306 unless ($string =~ /\012/s)
347 36 78 unless ($string =~ /\015\012/s or $string =~ /\012\015/s)
355 384 378 if defined $replacement_map{$eol_mode}
383 1290 1886 if (0 == @_) { }
1885 1 elsif (1 == @_) { }