| blib/lib/Text/MicroMason/Safe.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 14 | 42.8 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 12 | 8 | if (not $self->{'safe'} or $self->{'safe'} eq '1') { } |
| 8 | 0 | elsif (UNIVERSAL::can($self->{'safe'}, 'reval')) { } | |
| 40 | 0 | 20 | if $self->{'safe_methods'} |
| 47 | 0 | 0 | ref $_ ? : |
| 20 | 0 | !$_ ? : | |
| 62 | 0 | 0 | unless my $sub = $self->{$method} |
| 70 | 20 | 0 | unless $func =~ /^[a-z\_]+$/ |