line |
true |
false |
branch |
92
|
0 |
0 |
unless $mes->is_success and defined $g |
98
|
0 |
0 |
if ($n eq 'svID') { } |
|
0 |
0 |
elsif ($n eq 'svDate') { } |
|
0 |
0 |
elsif ($n eq 'svcMenu') { } |
|
0 |
0 |
elsif ($n eq 'dcp') { } |
109
|
0 |
0 |
if ($nn =~ /^(?:version|lang)$/) { } |
|
0 |
0 |
elsif ($nn eq 'objURI') { } |
|
0 |
0 |
elsif ($nn eq 'svcExtension') { } |
132
|
0 |
0 |
if (exists $tmp{'version'}) { } |
134
|
0 |
0 |
if @{$tmp{'version'};} > 1 |
135
|
0 |
0 |
unless grep {$po->version eq $_;} @{$tmp{'version'};} |
153
|
0 |
0 |
if exists $ns{$ns} |
158
|
0 |
0 |
if exists $ext{$ns} |
178
|
0 |
0 |
unless defined $login and length $login |
179
|
0 |
0 |
unless defined $password and length $password |
180
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($login, 3, 16) |
181
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($password, 6, 16) |
189
|
0 |
0 |
if (Net::DRI::Util::has_key($rdata, 'client_newpassword')) |
191
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$rdata{'client_newpassword'}, 6, 16) |
198
|
0 |
0 |
Net::DRI::Util::has_key($rdata, 'version') ? : |
199
|
0 |
0 |
unless defined $tmp |
200
|
0 |
0 |
ref $tmp eq 'ARRAY' ? : |
201
|
0 |
0 |
if defined $_ |
202
|
0 |
0 |
unless defined $tmp |
203
|
0 |
0 |
unless $tmp =~ /^[1-9]+\.[0-9]+$/ |
207
|
0 |
0 |
Net::DRI::Util::has_key($rdata, 'lang') ? : |
208
|
0 |
0 |
unless defined $tmp |
209
|
0 |
0 |
if ref $tmp eq 'ARRAY' |
210
|
0 |
0 |
unless Net::DRI::Util::xml_is_language($tmp) |
222
|
0 |
0 |
if (Net::DRI::Util::has_key($rdata, 'only_local_extensions') and $$rdata{'only_local_extensions'}) |
229
|
0 |
0 |
if (Net::DRI::Util::has_key($rdata, 'extensions')) |
232
|
0 |
0 |
unless ref $tmp eq 'ARRAY' |
234
|
0 |
0 |
if (grep {/^[-+]/;} @$tmp) { } |
239
|
0 |
0 |
if ($ext =~ s/^-//) { } |
245
|
0 |
0 |
unless grep {$ext eq $_;} @exts |
255
|
0 |
0 |
if (Net::DRI::Util::has_key($rdata, 'extensions_filter')) |
257
|
0 |
0 |
unless ref $$rdata{'extensions_filter'} eq 'CODE' |
263
|
0 |
0 |
if (@exts) { } |