Branch Coverage

blib/lib/LWP/Protocol/PSGI.pm
Criterion Covered Total %
branch 24 28 85.7


line true false branch
23 4 16 unless (scalar keys %orig)
25 4 4 if (my $orig = LWP::Protocol::implementor($proto)) { }
29 0 4 if $^W
34 18 2 if (defined wantarray)
46 18 0 if ($app == $stored_app)
58 1 1 if ($orig{$proto})
69 15 0 if (my $app = $self->handles($request)) { }
91 23 4 if ($app->match($request))
126 13 14 if ($options->{'host'}) { }
4 10 elsif ($options->{'uri'}) { }
128 5 8 unless &$matcher($request->uri->host)
138 3 14 if (ref $stuff eq 'Regexp') { }
3 11 elsif (ref $stuff eq 'CODE') { }
11 0 elsif (not ref $stuff) { }