| blib/lib/File/Dedup.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 12 | 30 | 40.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 19 | 11 | 0 | 1 | exists $opts{'group'} and defined $opts{'group'} |
| 29 | 4 | 0 | 7 | exists $opts{'ask'} and defined $opts{'ask'} |
| 33 | 8 | 0 | 3 | exists $opts{'recursive'} and defined $opts{'recursive'} |
| 112 | 0 | 2 | 2 | defined $to_keep and $to_keep == -1 |
| 139 | 0 | 0 | 0 | $self->ask and $response eq '' || $response =~ /^[yY]$/ |
| 164 | 0 | 4 | 0 | $input and $input > $max |
| 196 | 1 | 0 | 0 | $top ne $self->directory and not $self->recursive |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 112 | 0 | 0 | 4 | not defined $to_keep or defined $to_keep and $to_keep == -1 |
| 139 | 0 | 0 | 0 | $response eq '' || $response =~ /^[yY]$/ |
| 3 | 0 | 0 | not $self->ask or $self->ask and $response eq '' || $response =~ /^[yY]$/ |