| line |
true |
false |
branch |
|
106
|
3 |
18 |
@_ ? : |
|
107
|
0 |
21 |
if ref $args eq 'CODE' |
|
108
|
0 |
21 |
unless ref $args eq 'HASH' |
|
111
|
0 |
21 |
exists $$args{'generator'} ? : |
|
112
|
0 |
21 |
unless ref $prefix_generator eq 'CODE' |
|
115
|
1 |
20 |
exists $$args{'namespaces'} ? : |
|
116
|
0 |
21 |
unless ref $force_attr_prefixd_namespaces eq 'HASH' |
|
126
|
0 |
1 |
if exists $assigned_prefixes{$$force_attr_prefixd_namespaces{$ns}} |
|
138
|
2 |
10 |
$assigned_prefixes{''} ne '' ? : |
|
|
19 |
12 |
$_ ne '' ? : |
|
163
|
3 |
40 |
if tr/:// > 1 |
|
165
|
10 |
30 |
unless my($prefix) = /\Axmlns(?::(.*))?\z/msx |
|
166
|
4 |
26 |
unless defined $prefix |
|
170
|
1 |
29 |
if $prefix eq 'xml' and $ns ne 'http://www.w3.org/XML/1998/namespace' |
|
172
|
1 |
28 |
if $ns eq 'http://www.w3.org/2000/xmlns/' |
|
176
|
1 |
27 |
if $prefix eq 'xmlns' |
|
180
|
24 |
3 |
unless ($cowed) |
|
188
|
20 |
7 |
unless (exists $$assigned_ns{$ns}) |
|
202
|
0 |
37 |
unless my($efront, $eback) = $element->type_name =~ /\A([^:]+)(?::(.*))?\z/msx |
|
204
|
22 |
15 |
defined $eback ? : |
|
205
|
22 |
15 |
defined $eback ? : |
|
211
|
10 |
27 |
if ($prefix eq '' and not exists $$assigned_prefixes{''}) { } |
|
218
|
1 |
26 |
unless (defined $element_ns) |
|
221
|
23 |
13 |
length $new_element_prefix ? : |
|
226
|
0 |
37 |
unless my($afront, $aback) = /\A([^:]+)(?::(.*))?\z/msx |
|
228
|
27 |
10 |
defined $aback ? : |
|
229
|
27 |
10 |
defined $aback ? : |
|
232
|
4 |
33 |
if $aprefix eq '' and $alocal_name eq 'xmlns' |
|
233
|
23 |
10 |
if $aprefix eq 'xmlns' |
|
237
|
6 |
4 |
$aprefix eq '' ? : |
|
238
|
0 |
10 |
unless (defined $ns) |
|
241
|
3 |
7 |
$force_attr_prefix && length $new_prefix || $new_prefix ne $new_element_prefix ? : |
|
250
|
22 |
36 |
if (@content) |
|
263
|
2 |
6 |
if $prefix eq '' |
|
266
|
6 |
2 |
unless $prefix =~ s/(\d+)$/$1 + 1;/emsx |