| blib/lib/Catalyst/View/JSON/_PerRequest.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 8 | 15 | 53.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 50 | 0 | 0 | 8 | ref \$proto[0] eq 'SCALAR' and &Scalar::Util::looks_like_number($proto[0]) |
| 58 | 0 | 3 | 5 | scalar @proto and ref $proto[$#proto] eq 'HASH' |
| 0 | 0 | 3 | scalar @proto and &Scalar::Util::blessed($proto[$#proto]) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 19 | 34 | 4 | 0 | $self->{'data'} ||= do { my $default_view_model = $self->{'parent'}->default_view_model; $default_view_model = $self->{'ctx'}->model($default_view_model) unless ref $default_view_model; $default_view_model } |
| 106 | 6 | 0 | 2 | eval { do { $self->{'json'}->encode($self->data) } } || do { if (my $cb = $self->handle_encode_error) { delete $self->{'data'}; return &$cb($self, $@); } else { die $@; } } |