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'}
116 0 0 ref $self->{'serial'} eq 'CODE' ? :
0 0 !defined($self->{'serial'}) ? :
122 0 0 if ref $c eq "CODE"
141 0 0 if ($self->{'certkey'}) { }
147 0 0 if (ref $self->{'cache'} eq "HASH")
152 0 0 $k->{'key'} ? :
160 0 0 unless unpack("N", substr($data, 0, 4, "")) == 2
164 0 0 $certkey ? :
171 0 0 if $data ne ""
174 0 0 $key ? :