| blib/lib/Acme/DotDotGone.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 18 | 38.8 |
| line | true | false | branch |
|---|---|---|---|
| 38 | 0 | 1 | unless open FH, "<$0" |
| 40 | 0 | 1 | $_[1] ? : |
| 45 | 0 | 1 | if $1 |
| 67 | 0 | 0 | $2 eq 'dot' ? : |
| 1 | 0 | $_[2] =~ /[a-zA-Z]/ ? : | |
| 0 | 1 | $2 ? : | |
| 69 | 0 | 1 | if ($_[4]) |
| 70 | 0 | 0 | unless open FH, ">$0" |
| 76 | 0 | 1 | if ($_[2]) |