| Refactor.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 13 | 18 | 72.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 253 | 0 | 0 | 6 | $new_name and $old_name |
| 678 | 4 | 12 | 10 | -f $file and $self->is_perlfile($file) |
| 681 | 22 | 2 | 2 | -d $file and $depth >= 0 |
| line | l | !l | condition |
|---|---|---|---|
| 251 | 2 | 4 | shift() || 0 |
| 645 | 12 | 0 | "$file" || die("Could not open code file '${file}' - $!") |
| 671 | 6 | 0 | $where || die("Could not open directory '${where}': $!") |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 655 | 46 | 0 | 258 | /$regex1/o or /$regex2/o |