| line |
true |
false |
branch |
|
841
|
193 |
710 |
if ($! != 0) |
|
842
|
90 |
103 |
if ($! =~ /((Invalid)|(not valid))/i or $!{'EINVAL'}) { } |
|
877
|
2 |
2 |
if $Net::SSLeay::trace |
|
888
|
2 |
2 |
if print_errs($msg) |
|
905
|
304 |
0 |
defined $_[0] ? : |
|
906
|
0 |
54 |
if $@ |
|
931
|
0 |
1 |
unless $port =~ /^\d+$/ |
|
933
|
0 |
1 |
unless (defined $dest_serv_ip) |
|
936
|
0 |
1 |
if $trace |
|
937
|
0 |
1 |
wantarray ? : |
|
941
|
0 |
1 |
if $trace > 2 |
|
945
|
0 |
0 |
if (socket SSLCAT_S, &PF_INET(), &SOCK_STREAM(), $proto) |
|
946
|
0 |
1 |
if $trace > 3 |
|
947
|
0 |
1 |
if (CORE::connect SSLCAT_S, $sin) |
|
949
|
0 |
1 |
if $trace > 3 |
|
950
|
0 |
1 |
wantarray ? : |
|
954
|
0 |
0 |
if $trace |
|
956
|
0 |
1 |
wantarray ? : |
|
964
|
0 |
1 |
unless $proxyhost |
|
966
|
0 |
1 |
if $trace > 2 |
|
968
|
22 |
1 |
wantarray ? : |
|
|
0 |
23 |
unless $ret |
|
970
|
0 |
23 |
if $trace > 2 |
|
975
|
0 |
1 |
wantarray ? : |
|
|
0 |
23 |
if $errs |
|
977
|
2 |
21 |
if $trace > 2 |
|
978
|
0 |
1 |
wantarray ? : |
|
|
0 |
1 |
if $errs |
|
979
|
1 |
0 |
wantarray ? : |
|
1026
|
5 |
43 |
unless $how_much |
|
1032
|
4 |
45 |
$bsize < $how_much ? : |
|
1033
|
2 |
48 |
unless defined $n |
|
1034
|
2 |
27 |
unless $n |
|
1036
|
0 |
5 |
if $trace > 1 |
|
1039
|
1 |
4 |
wantarray ? : |
|
1185
|
0 |
6 |
if (ref $_[0]) { } |
|
1191
|
2 |
4 |
$trace > 2 && $linux_debug ? : |
|
1193
|
2 |
4 |
if $trace > 2 |
|
1195
|
3 |
3 |
if $trace > 3 |
|
1197
|
2 |
0 |
if (defined $wrote and $wrote > 0) { } |
|
|
3 |
0 |
elsif (not defined $wrote) { } |
|
1202
|
1 |
0 |
wantarray ? : |
|
1204
|
0 |
2 |
$trace > 2 && $linux_debug ? : |
|
1206
|
0 |
3 |
if $trace > 2 |
|
1208
|
1 |
2 |
wantarray ? : |
|
1385
|
16 |
46 |
if $ENV{'EGD_PATH'} |
|
1389
|
4 |
0 |
unless ($rnsf or -r $random_device or $seed or -S $egd_path) |
|
1391
|
280 |
4 |
if $trace and not $poll_retval |
|
1394
|
4 |
324 |
if $rnsf |
|
1395
|
0 |
324 |
if $seed |
|
1396
|
13 |
311 |
if $ENV{'RND_SEED'} |
|
1397
|
45 |
17 |
if -r $random_device |