| blib/lib/Perl/ToPerl6/Theme.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 12 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 55 | 8 | 106 | if ($rule =~ /$RULE_INVALID_CHARACTER_REGEX/msx) |
| 81 | 0 | 1634 | unless ref $transformer |
| 84 | 835 | 799 | unless my $rule = $self->{'_rule'} |
| 94 | 1179 | 304 | unless exists $themes{$1} |
| 97 | 1 | 798 | if ($Perl::ToPerl6::Theme::EVAL_ERROR) |
| 111 | 0 | 195 | unless defined $raw_rule |