Branch Coverage

blib/lib/Catalyst/Dispatcher.pm
Criterion Covered Total %
branch 104 128 81.2


line true false branch
106 955 9 if (my $action = $c->action) { }
114 9 0 $path ? :
117 0 9 if $c->debug
130 0 6958 unless ($command)
131 0 0 if $c->debug
137 4 6954 if (ref $extra_params[-2] eq "ARRAY")
141 24 6934 if (ref $extra_params[-1] eq 'ARRAY') { }
153 2 6956 if (&blessed($command) and $command->isa('Catalyst::Action')) { }
162 133 6824 unless ($action)
163 23 110 @extra_params ? :
188 0 50 if (not $action) { }
2 48 elsif (not defined $action->namespace) { }
4 44 elsif (not $action->class->can('_DISPATCH')) { }
204 6 44 if ($error)
206 0 6 if $c->debug
250 1 6906 unless ($action)
254 0 1 if $c->debug
266 1074 5788 if (@{$c->error;})
280 14 2 if $command
288 5970 986 unless ($path =~ m[^/])
305 6822 21 if (my $action = $c->get_action($tail, $path)) { }
311 4 17 unless $path
323 3 130 if $component eq &blessed($c)
325 14 116 &blessed($component) ? :
336 24 108 if (my $code = $component_class->can("action_for"))
338 22 2 if $possible_action
341 110 0 if (my $code = $component_class->can($method)) { }
351 2 108 &blessed($component_or_class) ? :
359 0 0 if $c->debug
388 912 4091 if $type->match($c, $path)
397 0 922 unless $req->captures
399 16 0 if ($c->debug and defined $req->match and length $req->match)
406 3 919 if $c->debug and @args
423 0 7830 unless $name
425 4983 2847 defined $namespace ? :
444 3126 4739 unless $path =~ m[/]
454 0 2907 unless $action
472 0 2907 if $namespace eq "/"
476 2282 625 if (length $namespace)
501 1 69 $uri eq '' ? :
70 200 if defined $uri
520 97 683 if $expanded
540 41582 55516 if $key eq "Private"
542 1154 54362 unless ($registered->{$class})
549 106 1048 unless $load_failed
559 76273 209567 if ($type->_is_low_precedence) { }
569 44526 165026 if $type->register($c, $action)
572 41756 27416 unless ($was_registered)
595 3734 65438 unless $namespace
605 65438 143296 unless $part
610 6235 137061 unless ($child)
634 6 7529 if ref $comp eq "CODE"
635 6515 1020 if $comp->can("register_actions")
640 157 7 unless $c->debug
648 7 0 $avail_width * 0.25 < 20 ? :
649 7 0 $avail_width * 0.5 < 36 ? :
659 4 7 unless $prefix =~ m[/$]
666 45 26 if $action =~ /^_.*/ and not $c->config->{'show_internal_actions'}
675 5 2 if $has_private
692 0 663 unless $success
716 1 2 if ref $_ eq $name
724 1154 0 unless $key =~ /^(Local)?Regexp?/
727 0 0 if ($load_failed) { }
0 0 elsif (not defined $Catalyst::DispatchType::Regex::VERSION or $Catalyst::DispatchType::Regex::VERSION le '5.90020') { }