| blib/lib/Perl/ToPerl6/Statistics.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 24 | 41.6 |
| line | true | false | branch |
|---|---|---|---|
| 46 | 1 | 3 | if ($subs) |
| 54 | 4 | 0 | $statements ? : |
| 62 | 0 | 8 | if ('=' eq substr($_, 0, 1)) { } |
| 0 | 8 | elsif ($in_pod) { } | |
| 0 | 8 | elsif ('__END__' eq $_ or '__DATA__' eq $_) { } | |
| 0 | 8 | elsif ($in_data) { } | |
| 0 | 8 | elsif (/ \A \s* \# /msx) { } | |
| 1 | 7 | elsif (/ \A \s* \z /msx) { } | |
| 208 | 0 | 0 | if $self->subs == 0 |
| 218 | 0 | 0 | if $self->modules == 0 |
| 230 | 0 | 0 | if $statements == 0 |
| 240 | 0 | 0 | if $self->lines == 0 |