line |
true |
false |
branch |
26
|
0 |
0 |
unless socket SOCK, 2, 1, $proto |
27
|
0 |
0 |
unless connect SOCK, $paddr |
55
|
0 |
0 |
unless tie my %Session, $Param{'tieargs'}[0], $Param{'tieargs'}[1], $Param{'tieargs'}[2], $Param{'tieargs'}[3], $Param{'tieargs'}[4], $Param{'tieargs'}[5], $Param{'tieargs'}[6], $Param{'tieargs'}[7], $Param{'tieargs'}[8], $Param{'tieargs'}[9] |
69
|
0 |
0 |
if ($Session{$Cookie}) { } |
87
|
0 |
0 |
unless ($Cookie or defined $PostKey) |
90
|
0 |
0 |
if ($ENV{'REQUEST_METHOD'} eq 'POST') { } |
101
|
0 |
0 |
if ($PostKey) |
102
|
0 |
0 |
unless pipe POSTREAD, POSTWRITE |
103
|
0 |
0 |
if (fork) { } |
115
|
0 |
0 |
unless close POSTWRITE |
116
|
0 |
0 |
if $Cookie |
123
|
0 |
0 |
if ($ENV{'QUERY_STRING'} =~ /AIS_OTUkey=(\w+)/) { } |
|
0 |
0 |
elsif (not $Cookie) { } |
125
|
0 |
0 |
unless my($method, $host, $port, $path) = $Param{'aissri'} =~ m[^(\w+)://([^:/]+):?(\d*)(.+)$] |
128
|
0 |
0 |
unless ($method eq 'http') |
139
|
0 |
0 |
unless ($AISXML) = $Response =~ m[(.+)]is |
147
|
0 |
0 |
if ($ENV{'REQUEST_METHOD'} eq 'POST') |
158
|
0 |
0 |
if $ENV{'QUERY_STRING'} eq 'AIS_LOGOUT' |
169
|
0 |
0 |
unless $AISXML =~ m[<$_>(.+)$_>]is |
173
|
0 |
0 |
if (defined $Param{'timeout'}) |
180
|
0 |
0 |
if ($Result{'identity'} eq 'NULL' or $Result{'identity'} eq 'ERROR') |
182
|
0 |
0 |
if $SessionKey |
184
|
0 |
0 |
unless $Param{'nodie'} |