| line |
true |
false |
branch |
|
16
|
10 |
0 |
unless (@IO::String::ISA) |
|
83
|
0 |
0 |
unless $XML::Validator::Schema::VERSION |
|
107
|
8 |
2 |
if (&Params::Util::_SCALAR($file)) |
|
110
|
8 |
2 |
if (&Params::Util::_INSTANCE($file, 'IO::Handle')) |
|
111
|
8 |
0 |
if ($file->can('seek')) |
|
113
|
0 |
8 |
unless $file->seek(0, 0) |
|
120
|
0 |
2 |
unless (defined $file and not ref $file and length $file) |
|
123
|
0 |
2 |
unless ($file and -f $file and -r _) |
|
127
|
0 |
2 |
unless ($fh) |
|
137
|
11 |
0 |
if (exists $$object{$name}) |
|
139
|
0 |
11 |
if (&Params::Util::_ARRAY0($$object{$name})) |
|
151
|
11 |
0 |
&Params::Util::_SCALAR0($object->$name) ? : |
|
156
|
27 |
33 |
unless my $string = &Params::Util::_STRING(shift()) |
|
157
|
32 |
1 |
$PITA::XML::SCHEMES{$string} || $string =~ /x_/ ? : |
|
162
|
0 |
0 |
unless my $md5sum = &Params::Util::_STRING(shift()) |
|
163
|
0 |
0 |
$md5sum =~ /^[0-9a-f]{32}$/i ? : |
|
168
|
1 |
20 |
unless my $distname = &Params::Util::_STRING(shift()) |
|
169
|
19 |
1 |
$distname =~ /^[a-z]\w*(?:\-[a-z]\w*)+$/is ? : |
|
174
|
0 |
6 |
unless my $guid = &Params::Util::_STRING(shift()) |
|
175
|
6 |
0 |
$guid =~ /^[0-9A-F]{8}-[0-9A-F]{4}-[0-9A-F]{4}-[0-9A-F]{4}-[0-9A-F]{12}$/ ? : |