| blib/lib/Perl/ToPerl6/Theme.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 4 | 12 | 33.3 |
| line | true | false | branch |
|---|---|---|---|
| 51 | 0 | 4 | if ($rule =~ /$RULE_INVALID_CHARACTER_REGEX/msx) |
| 77 | 0 | 37 | unless ref $transformer |
| 80 | 37 | 0 | unless my $rule = $self->{'_rule'} |
| 90 | 0 | 0 | unless exists $themes{$1} |
| 93 | 0 | 0 | if ($Perl::ToPerl6::Theme::EVAL_ERROR) |
| 107 | 0 | 7 | unless defined $raw_rule |