| blib/lib/Template/EmbeddedPerl/SafeString.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 28 | 21.4 |
| line | true | false | branch |
|---|---|---|---|
| 15 | 0 | 0 | unless ref $other eq ref $self |
| 17 | 0 | 0 | $reverse ? : |
| 37 | 61 | 0 | if (scalar @_ == 1) { } |
| 38 | 0 | 61 | is_safe($_[0]) ? : |
| 40 | 0 | 0 | is_safe($_) ? : |
| 45 | 0 | 0 | if (is_safe($_)) { } |
| 51 | 0 | 100 | unless defined $string_to_test |
| 52 | 89 | 0 | unless (builtin::blessed($string_to_test) || '') eq "Template::EmbeddedPerl::SafeString" or (builtin::blessed($string_to_test) || '') eq "Valiant::HTML::SafeString" or (builtin::blessed($string_to_test) || '') eq "Mojo::ByteStream" |
| 60 | 0 | 0 | if (scalar @_ == 1) { } |
| 61 | 0 | 0 | is_safe($_[0]) ? : |
| 63 | 0 | 0 | is_safe($_) ? : |
| 70 | 11 | 28 | is_safe($_) ? : |
| 83 | 0 | 0 | ${$_[0];} ? : |
| 87 | 0 | 0 | is_safe($_) ? : |