line |
true |
false |
branch |
38
|
2 |
95 |
unless $string
|
44
|
42 |
53 |
if $base
|
53
|
148 |
42 |
if (not ref $val or ref $val eq 'CODE')
|
58
|
1 |
189 |
if (ref $val ne 'HASH')
|
64
|
2 |
187 |
unless (exists $val->{'to'})
|
70
|
72 |
115 |
unless (ref $val->{'to'})
|
71
|
2 |
70 |
defined $val->{'to'} && $val->{'to'} =~ s/^(\+)// ? :
|
72
|
2 |
70 |
$sigil ? :
|
75
|
9 |
42 |
if (defined $val->{'to'} and $val->{'to'} =~ /^(.+)::(\w+)$/ and $1 ne 'main' and not 'Class::Inspector'->loaded($1))
|
84
|
16 |
170 |
if (ref $key eq 'ARRAY')
|
86
|
1 |
15 |
unless (grep {$method eq $_;} 'GET', 'POST', 'PUT', 'DELETE')
|
94
|
2 |
184 |
if (ref $key and ref $key ne 'Regexp')
|
102
|
7 |
177 |
if ($tree = delete $val->{'tree'})
|
103
|
0 |
7 |
if (ref $tree ne 'ARRAY') { }
|
114
|
12 |
172 |
if (%$parent)
|
115
|
7 |
1 |
if ($val->{'name'} and $parent->{'name'})
|
125
|
19 |
165 |
if (my $name = $val->{'name'})
|
126
|
0 |
19 |
if (exists $self->names->{$name})
|
141
|
0 |
14 |
@_ == 1 ? :
|
143
|
5 |
9 |
unless exists $self->names->{$name}
|
160
|
0 |
10 |
unless $b->bridge <=> $a->bridge
|
170
|
0 |
193 |
unless $app
|
171
|
0 |
193 |
unless $route
|
178
|
3 |
190 |
if (not $to or ref $to and ref $to ne 'CODE')
|
184
|
22 |
168 |
unless (ref $to)
|
187
|
3 |
19 |
unless (exists &$to)
|