| line |
true |
false |
branch |
|
103
|
0 |
0 |
$$env{'cleaned'} ? : |
|
105
|
0 |
0 |
unless (defined $infile) |
|
109
|
0 |
0 |
if (-d $infile) |
|
113
|
0 |
0 |
if (ref $infile) |
|
117
|
0 |
0 |
unless (open FILE, $infile) |
|
121
|
0 |
0 |
unless (-T _) |
|
135
|
0 |
0 |
unless (/^.*\n$/) |
|
148
|
0 |
0 |
if $first and /^[ \t]*$/ |
|
155
|
0 |
0 |
/^[ \t]*$/ ? : |
|
181
|
0 |
0 |
if /^\s* {8,}/ |
|
188
|
0 |
0 |
if / \t/ |
|
197
|
0 |
0 |
if /[ \t]$/ |
|
202
|
0 |
0 |
if defined $$env{'error'} |
|
203
|
0 |
0 |
if $leading |
|
204
|
0 |
0 |
if $indent |
|
205
|
0 |
0 |
if $spacetab |
|
206
|
0 |
0 |
if $ateol |
|
207
|
0 |
0 |
if $trailing |
|
209
|
0 |
0 |
if $leading |
|
210
|
0 |
0 |
if $trailing |
|
211
|
0 |
0 |
if $indent |
|
212
|
0 |
0 |
if $spacetab |
|
213
|
0 |
0 |
if $ateol |
|
224
|
0 |
0 |
unless (defined $infile) |
|
228
|
0 |
0 |
if (-d $infile) |
|
232
|
0 |
0 |
if (ref $infile) |
|
236
|
0 |
0 |
unless (open FILE, $infile) |
|
241
|
0 |
0 |
if (defined $outfile) { } |
|
242
|
0 |
0 |
unless (open OUTFILE, ">$outfile") |
|
249
|
0 |
0 |
unless (-w $infile) |
|
263
|
0 |
0 |
if not defined $cleanup or $$cleanup{'leading'} |
|
265
|
0 |
0 |
if not defined $cleanup or $$cleanup{'trailing'} |
|
271
|
0 |
0 |
if not defined $cleanup or $$cleanup{'indent'} |
|
277
|
0 |
0 |
if not defined $cleanup or $$cleanup{'eol'} |
|
283
|
0 |
0 |
if not defined $cleanup or $$cleanup{'spacetab'} |
|
292
|
0 |
0 |
unless (open FILE, ">$tmp") |
|
356
|
0 |
0 |
if defined $ifh |
|
357
|
0 |
0 |
if defined $tfh |
|
367
|
0 |
0 |
if ($first) { } |
|
368
|
0 |
0 |
unless (/^[ \t]*$/) |
|
404
|
0 |
0 |
_brinkoftabstop($`) ? : |