Branch Coverage

blib/lib/Catalyst/Controller.pm
Criterion Covered Total %
branch 90 100 90.0


line true false branch
95 6999 79 unless delete $self->_controller_actions->{'*'}
134 37 2796 unless $c->forward($disp)
143 655 300 unless $begin
146 0 300 if (@{$c->error;}) { }
163 2 34 unless $c->state
170 949 0 if (ref $c->action and $c->action->can("execute") and defined $c->req->action)
177 26 892 if (@{$c->error;}) { }
187 283 646 unless $end
194 4 61 $self->isa('Catalyst') ? :
250 0 6517 unless $meta->can("get_nearest_methods_with_attributes")
260 0 655 unless $meta->find_method_by_name($_)
263 6368 149 if ref $self
281 148 0 if (not &blessed($self) and $self eq $c and scalar @methods)
283 2 146 if (scalar @really_bad_methods)
292 69095 81 $method->can('attributes') ? :
294 0 69176 if ($attrs->{'Private'} and keys %$attrs > 1)
296 0 0 if $c->debug
301 65442 3734 $namespace ? :
334 918 68258 exists $args{'attributes'}{'ActionClass'} ? :
348 316 68860 unless Class::MOP::does_metaclass_exist($class)
351 36601 32575 unless ($args{'name'} =~ /^_(DISPATCH|BEGIN|AUTO|ACTION|END)$/)
355 1818 34783 if @roles
362 68434 742 ref $self ? :
365 67832 1344 unless $action_args->{'*'}
366 68928 248 unless $$action_args{$args{'name'}}
376 36599 2 &blessed($self) ? :
36115 486 unless $args{'attributes'}{'Does'}
384 1308 35293 if $args{'attributes'}{'Method'}
387 13 36588 if $args{'attributes'}{'Consumes'}
390 8 36593 if $args{'attributes'}{'Scheme'}
393 8 36593 if $args{'attributes'}{'Query'}
406 96095 0 if (my($key, $value) = $attr =~ /^(.*?)(?:\(\s*(.+?)?\s*\))?$/)
409 35947 60148 if (defined $value)
410 11910 24037 unless $value =~ s/^'(.*)'$/$1/
417 68434 742 if (ref $self) { }
431 162 984 ref $_ eq 'ARRAY' ? :
654 68522 exists $actions_config->{$name} ? :
441 27594 41582 unless $raw_attributes{'Private'}
457 96012 16586 ref $values eq 'ARRAY' ? :
459 44325 68437 if (my $code = $self->can($meth)) { }
462 29149 15419 $key eq $new_key ? :
494 584 14782 unless defined $value
495 2140 13226 if ($value =~ m[^/]) { }
12633 593 elsif (length $value) { }
509 11469 910 if (defined $value and length $value) { }
510 324 11145 if ($value eq '.') { }
324 10821 elsif (my($rel, $rest) = $value =~ m[^((?:\.{2}/)+)(.*)$]) { }
6555 4266 elsif (not $value =~ m[^/]) { }
520 6408 147 if ($action_ns) { }
576 7564 0 $self->can('_action_role_prefix') ? :