Branch Coverage

blib/lib/Nile/Router.pm
Criterion Covered Total %
branch 0 112 0.0


line true false branch
118 0 0 unless $file =~ /\.xml$/i
171 0 0 unless $route
175 0 0 unless $uri
183 0 0 if (ref $uri eq 'CODE')
215 0 0 if (exists $$self{'cache'}{"$method $full_uri"})
217 0 0 if (ref $$self{'cache'}{"$method $full_uri"}) { }
218 0 0 wantarray ? :
221 0 0 unless defined $$self{'cache'}{"$method $full_uri"}
227 0 0 unless $method eq '*' or $$_{'method'} eq $method
228 0 0 if (my(@captured) = $uri =~ /$$route{'regexp'}/)
233 0 0 if (ref $$route{'target'} eq 'ARRAY') { }
239 0 0 wantarray ? :
261 0 0 unless defined $querystring
268 0 0 @captured ? :
271 0 0 unless length $value
273 0 0 if exists $defaults{$_}
282 0 0 if defined $$values{$_}
285 0 0 if defined $defaults{$_}
286 0 0 if defined $defaults{$_}
291 0 0 if ($target =~ /\?/) { }
292 0 0 $params ? :
296 0 0 if ($params)
313 0 0 unless my $route = $$self{'names'}{$name}
317 0 0 unless defined $$args{$_}
327 0 0 if (defined $$args{$_} and length $$args{$_}) { }
337 0 0 if defined $$args{$_} and length $$args{$_}
340 0 0 if (length $params)
341 0 0 $template =~ /\?/ ? :
362 0 0 unless ($uri) = split(/\?/, $uri, 2)
364 0 0 unless $method eq '*' or $$_{'method'} eq $method
365 0 0 if (my(@captured) = $uri =~ /$$route{'regexp'}/)
406 0 0 unless defined $args{'path'} and length $args{'path'}
408 0 0 unless defined $args{'target'} and length $args{'target'}
410 0 0 unless defined $args{'name'} and length $args{'name'}
412 0 0 if (exists $$self{'names'}{$args{'name'}})
416 0 0 if (exists $$self{'paths_methods'}{$uid})
420 0 0 if (exists $$self{'paths_methods'}{$starUID})
430 0 0 if (my $exists = $$self{'patterns'}{$regUID})
456 0 0 if ($1) { }
0 0 elsif ($2) { }
0 0 elsif ($3) { }
0 0 elsif ($4) { }
459 0 0 $pattern ? :
467 0 0 if ($part =~ /^\*/) { }
483 0 0 unless ($copy =~ m[\/[^/]+\.[^/]+$])
484 0 0 unless $copy =~ m[/$]
500 0 0 if ($1) { }
0 0 elsif ($2) { }
0 0 elsif ($3) { }
0 0 elsif ($4) { }
509 0 0 if ($part =~ /^\*/) { }
522 0 0 unless ($copy =~ m[\/[^/]+\.[^/]+$])
523 0 0 unless $copy =~ m[/$]
536 0 0 unless eval { do { $self->uri_for($args{'name'}) } }
548 0 0 unless defined $decode
562 0 0 unless defined $encode