| blib/lib/Thunderhorse/Request.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 2 | 3 | 66.6 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 32 | 4 | 2 | 0 | $self->{'path_params'} //= do { my $ctx = $self->context; my $match = $ctx->match; $match = $match->[0] if ref $match eq "ARRAY"; my $pattern = $match->location->pattern_obj; my $matched = $match->matched; +{mesh([map({$_->{'label'};} @{$pattern->tokens})], $matched)} } |