Branch Coverage

blib/lib/LWP/Protocol/PSGI.pm
Criterion Covered Total %
branch 21 28 75.0


line true false branch
23 2 15 unless (scalar keys %orig)
25 2 2 if (my $orig = LWP::Protocol::implementor($proto)) { }
29 0 2 if $^W
34 17 0 if (defined wantarray)
46 17 0 if ($app == $stored_app)
58 0 0 if ($orig{$proto})
68 10 0 if (my $app = $self->handles($request)) { }
87 18 4 if ($app->match($request))
122 12 10 if ($options->{'host'}) { }
4 6 elsif ($options->{'uri'}) { }
124 5 7 unless &$matcher($request->uri->host)
134 3 13 if (ref $stuff eq 'Regexp') { }
3 10 elsif (ref $stuff eq 'CODE') { }
10 0 elsif (not ref $stuff) { }