line |
true |
false |
branch |
27
|
0 |
0 |
if ($config{'min_dupl'} =~ s/\s*\%//) |
33
|
0 |
0 |
if ($config{'min_dupl'} < 2) |
44
|
0 |
0 |
unless open my $INPUT_FILE, '<', $file |
55
|
0 |
0 |
if ($config{'ignore_digits'}) |
58
|
0 |
0 |
if ($config{'digest'}) |
72
|
0 |
0 |
if ($config{'log'}) |
79
|
0 |
0 |
if ($config{'only_headers_and_footers'}) { } |
91
|
0 |
0 |
unless open my $OUTPUT_FILE, '>', $new_filename |
107
|
0 |
0 |
if ($config{'ignore_digits'}) |
111
|
0 |
0 |
if ($config{'digest'}) |
115
|
0 |
0 |
if ($line_tmp eq '') { } |
|
0 |
0 |
elsif ($dupl{$line_tmp} > $config{'min_dupl'}) { } |
120
|
0 |
0 |
if ($config{'log'}) |
143
|
0 |
0 |
if ($config{'ignore_digits'}) |
147
|
0 |
0 |
if ($config{'digest'}) |
151
|
0 |
0 |
if ($line_tmp eq '') { } |
|
0 |
0 |
elsif ($dupl{$line_tmp} > $config{'min_dupl'}) { } |
158
|
0 |
0 |
if ($config{'log'}) |
188
|
0 |
0 |
if (defined $config_arg{$opt}) |
193
|
0 |
0 |
if ($config{'log'}) |
194
|
0 |
0 |
unless open $LOG_FILE, '>', $config{'log'} |