| blib/lib/Perl/Tidy/FileWriter.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 18 | 61.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 185 | 267 | 0 | 288 | $self->[17] && !@{$rlist;} |
| 253 | 55 | 715 | 102 | not $forced and $self->[4] >= $rOpts->{'maximum-consecutive-blank-lines'} |
| 259 | 55 | 715 | 0 | not $forced and $self->[6] > 0 |
| 368 | 0 | 5 | 0 | $str and substr($str, 0, 1) eq "\t" |
| 5 | 0 | 0 | $str and substr($str, 0, 1) eq "\t" and $str =~ /^\t+/g |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 302 | 0 | 264 | 2934 | not defined $Kt or $Kt != $K |