Branch Coverage

blib/lib/IO/Socket/SSL/Intercept.pm
Criterion Covered Total %
branch 0 52 0.0


line true false branch
16 0 0 unless ($cacert)
17 0 0 if (my $f = delete $args{'proxy_cert_file'}) { }
25 0 0 unless ($cakey)
26 0 0 if (my $f = delete $args{'proxy_key_file'}) { }
34 0 0 unless ($certkey)
35 0 0 if (my $f = delete $args{'cert_key_file'})
41 0 0 if (ref $cache eq "CODE")
44 0 0 if (not $type) { }
0 0 elsif ($type == 1) { }
52 0 0 unless @ck
75 0 0 unless my $self = shift()
76 0 0 ref $self->{'cache'} ne 'CODE' ? :
78 0 0 unless $$_
83 0 0 unless $$_
96 0 0 if (my $ext = $hash->{'ext'})
98 0 0 if defined $_->{'sn'}
117 0 0 ref $self->{'serial'} eq 'CODE' ? :
0 0 !defined($self->{'serial'}) ? :
123 0 0 if ref $c eq "CODE"
142 0 0 if ($self->{'certkey'}) { }
148 0 0 if (ref $self->{'cache'} eq "HASH")
153 0 0 $k->{'key'} ? :
161 0 0 unless unpack("N", substr($data, 0, 4, "")) == 2
165 0 0 $certkey ? :
172 0 0 if $data ne ""
175 0 0 $key ? :