Branch Coverage

blib/lib/LWP/UserAgent/Mockable.pm
Criterion Covered Total %
branch 30 36 83.3


line true false branch
17 11 0 unless (defined $instance)
29 9 2 defined $ENV{'LWP_UA_MOCK'} ? :
40 0 22 if (scalar @{$instance->{'actions'};})
44 9 13 unless (defined $action)
48 0 22 unless ($action =~ /^(playback|record|passthrough)/)
52 1 21 if ($action ne 'passthrough' and not defined $file)
70 5 16 if ($action eq 'playback') { }
80 0 18 unless (defined $current)
86 3 15 if ($callbacks->{'playback_validation'})
92 1 17 if ($callbacks->{'playback'})
95 0 1 unless ($response->$LWP::UserAgent::Mockable::_isa('HTTP::Response'))
109 9 18 if ($callbacks->{'pre_record'})
112 3 6 if (not $_[-1]->$LWP::UserAgent::Mockable::_isa('HTTP::Response'))
127 9 15 if ($callbacks->{'record'})
133 3 6 unless ($response->$LWP::UserAgent::Mockable::_isa('HTTP::Response'))
138 13 8 if ($action eq 'record')
158 3 6 if ($action eq 'record') { }
0 6 elsif ($action eq 'playback' and scalar @{$instance->{'actions'};}) { }