| line |
true |
false |
branch |
|
107
|
0 |
0 |
$_[0] > $_[1] ? : |
|
110
|
0 |
0 |
if (ref $XML::XSH::Functions::OUT eq 'GLOB' or ref $XML::XSH::Functions::OUT eq 'Term::ReadLine::Gnu::Var') { } |
|
129
|
0 |
0 |
unless ref $_[0] |
|
130
|
0 |
0 |
if (ref $_[0]) { } |
|
135
|
0 |
0 |
if $module |
|
137
|
0 |
0 |
if ($@) |
|
148
|
0 |
0 |
if ($] >= 5.008) { } |
|
164
|
0 |
0 |
if (eval {
do {
require XML::XSH::Parser
}
}) { } |
|
171
|
0 |
0 |
unless ($XML::XSH::Functions::QUIET) |
|
200
|
0 |
0 |
unless ($XML::XSH::Functions::XPATH_AXIS_COMPLETION =~ /^always|when-empty|never$/) |
|
224
|
0 |
0 |
unless (eval {
do {
require XML::LibXML::XPathContext;
$XML::XSH::Functions::_xpc = 'XML::LibXML::XPathContext'->new
}
}) |
|
236
|
0 |
0 |
if @_ != 1 |
|
238
|
0 |
0 |
if @_ != 1 |
|
239
|
0 |
0 |
unless exists $XML::XSH::Functions::_doc{$id} |
|
244
|
0 |
0 |
if @_ != 2 |
|
248
|
0 |
0 |
literal_value($string) =~ /$regexp/ ? : |
|
254
|
0 |
0 |
if @_ != 2 |
|
256
|
0 |
0 |
unless ref $nodelist and $nodelist->isa('XML::LibXML::NodeList') |
|
263
|
0 |
0 |
if @_ != 2 |
|
265
|
0 |
0 |
unless ref $nodea and $nodea->isa('XML::LibXML::NodeList') |
|
267
|
0 |
0 |
unless ref $nodeb and $nodeb->isa('XML::LibXML::NodeList') |
|
286
|
0 |
0 |
get_backups() ? : |
|
287
|
0 |
0 |
$XML::XSH::Functions::QUIET ? : |
|
288
|
0 |
0 |
$XML::XSH::Functions::DEBUG ? : |
|
289
|
0 |
0 |
$XML::XSH::Functions::TEST_MODE ? : |
|
301
|
0 |
0 |
if ($@ =~ /^SIGINT/) { } |
|
306
|
0 |
0 |
defined $res ? : |
|
313
|
0 |
0 |
if ($@ =~ /^SIGINT/) { } |
|
318
|
0 |
0 |
defined $res ? : |
|
323
|
0 |
0 |
unless ref $XML::XSH::Functions::_xsh |
|
324
|
0 |
0 |
if (ref $XML::XSH::Functions::_xsh) { } |
|
326
|
0 |
0 |
$code =~ /^\s*$/ ? : |
|
349
|
0 |
0 |
if ($format eq 'xml') { } |
|
|
0 |
0 |
elsif ($format eq 'html') { } |
|
|
0 |
0 |
elsif ($format eq 'docbook') { } |
|
351
|
0 |
0 |
unless $_[0] =~ /^\s*\<\?xml / |
|
362
|
0 |
0 |
unless ref $XML::XSH::Functions::_parser |
|
378
|
0 |
0 |
if defined $XML::LibXSLT::VERSION |
|
380
|
0 |
0 |
if defined $XML::LibXML::XPathContext::VERSION |
|
396
|
0 |
0 |
if exists $XML::XSH::Functions::_doc{$_[0]} |
|
402
|
0 |
0 |
if ($ns eq '') |
|
403
|
0 |
0 |
if ($name =~ /^_\.(.*)$/ and exists $_nodelist{$1}) { } |
|
|
0 |
0 |
elsif (defined ${"XML::XSH::Map::$name";}) { } |
|
416
|
0 |
0 |
if ($_[0] =~ /^\$(.*)/ and defined ${"XML::XSH::Map::$1";}) { } |
|
|
0 |
0 |
elsif ($_[0] =~ /^\%(.*)/ and exists $_nodelist{$1}) { } |
|
439
|
0 |
0 |
if defined ${"XML::XSH::Map::$_";} |
|
447
|
0 |
0 |
if ($_[0] =~ /^\$?(.*)/) |
|
448
|
0 |
0 |
if defined ${"XML::XSH::Map::$1";} |
|
461
|
0 |
0 |
if (defined toUTF8($enc, '') and defined fromUTF8($enc, '')) { } |
|
473
|
0 |
0 |
if $ok |
|
480
|
0 |
0 |
if $ok |
|
488
|
0 |
0 |
if ($XML::XSH::Functions::TRAP_SIGINT) { } |
|
498
|
0 |
0 |
if ($XML::XSH::Functions::TRAP_SIGPIPE) { } |
|
512
|
0 |
0 |
if ($XML::XSH::Functions::_sigint) |
|
531
|
0 |
0 |
if ($err) |
|
532
|
0 |
0 |
if ($err =~ /^SIGINT/) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_die_on_err) { } |
|
533
|
0 |
0 |
if ($survive_int) { } |
|
541
|
0 |
0 |
if ($err =~ /^SIGPIPE/) { } |
|
547
|
0 |
0 |
if ($err =~ /^SIGPIPE/) { } |
|
568
|
0 |
0 |
if ($XML::XSH::Functions::LOCAL_NODE and $id eq $XML::XSH::Functions::LOCAL_ID) { } |
|
571
|
0 |
0 |
if $id eq '' |
|
572
|
0 |
0 |
$XML::XSH::Functions::_doc{$id} ? : |
|
579
|
0 |
0 |
if ($id eq '') |
|
581
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
583
|
0 |
0 |
wantarray ? : |
|
589
|
0 |
0 |
if (ref $node) |
|
592
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->xml_equal($XML::XSH::Functions::_doc{$id}, $doc)) |
|
593
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
599
|
0 |
0 |
if ($uri ne '') |
|
600
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
617
|
0 |
0 |
if (ref $node) { } |
|
638
|
0 |
0 |
unless (ref $doc) |
|
641
|
0 |
0 |
if ($query eq '') |
|
645
|
0 |
0 |
unless ref $doc |
|
648
|
0 |
0 |
if (ref $newlocal) { } |
|
661
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_text($node) or $XML::XSH::Functions::_xml_module->is_cdata_section($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_comment($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_pi($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
673
|
0 |
0 |
if ($node->parentNode) { } |
|
675
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($node)) { } |
|
680
|
0 |
0 |
if (@children == 1 and $XML::XSH::Functions::_xml_module->xml_equal($node, $children[0])) |
|
684
|
0 |
0 |
if $XML::XSH::Functions::_xml_module->xml_equal($node, $children[$pos]) |
|
696
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
706
|
0 |
0 |
unless ref $node |
|
720
|
0 |
0 |
unless $doc |
|
728
|
0 |
0 |
if ($pwd) { } |
|
743
|
0 |
0 |
if ($l =~ /\G\\(.|\n)/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G([^\\\$]+)/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G\$\{([a-zA-Z_][a-zA-Z0-9_]*)\}/cogs or $l =~ /\G\$([a-zA-Z_][a-zA-Z0-9_]*)/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G\$\{\{\{(.+?)\}\}\}/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G\$\{\{\s*([a-zA-Z_][a-zA-Z0-9_]*):(?!:)(.*?)\}\}/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G\$\{\{([^\{].*?)\}\}/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G\$\{\(\s*([a-zA-Z_][a-zA-Z0-9_]*):(?!:)(.*?)\)\}/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G\$\{\((.+?)\)\}/cogs) { } |
|
|
0 |
0 |
elsif ($l =~ /\G(.|\n)/cogs) { } |
|
744
|
0 |
0 |
if (exists $_chr{$1}) { } |
|
773
|
0 |
0 |
wantarray ? : |
|
782
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
795
|
0 |
0 |
ref $_[0] ? : |
|
821
|
0 |
0 |
if ($_->[0] eq '$') { } |
|
837
|
0 |
0 |
if ($new) { } |
|
|
0 |
0 |
elsif (@XML::XSH::Functions::stored_variables and ref $XML::XSH::Functions::stored_variables[$#XML::XSH::Functions::stored_variables]) { } |
|
850
|
0 |
0 |
if $new |
|
857
|
0 |
0 |
unless (ref $pool) |
|
863
|
0 |
0 |
if ($name =~ /^\$/) { } |
|
|
0 |
0 |
elsif ($name =~ /^\%(.*)$/) { } |
|
864
|
0 |
0 |
if (defined $value) { } |
|
870
|
0 |
0 |
if (defined $value) { } |
|
891
|
0 |
0 |
if ($q =~ s/^\%([a-zA-Z_][a-zA-Z0-9_]*)(.*)$/\$_.$1$2/) { } |
|
894
|
0 |
0 |
unless (exists $XML::XSH::Functions::_nodelist{$name}) |
|
897
|
0 |
0 |
if ($query =~ /\S/) { } |
|
898
|
0 |
0 |
if ($XML::XSH::Functions::_xpc->isa('XML::LibXML::XPathContext')) { } |
|
899
|
0 |
0 |
if ($query =~ /^\s*\[(\d+)\](.*)$/) { } |
|
901
|
0 |
0 |
exists $XML::XSH::Functions::_nodelist{$name}[1][$1 + 1] ? : |
|
907
|
0 |
0 |
if ($query =~ /^\s*\[(\d+)\](.*)$/) { } |
|
|
0 |
0 |
elsif ($query =~ /^\s*\[/) { } |
|
909
|
0 |
0 |
$XML::XSH::Functions::_nodelist{$name}[1][$1 + 1] ? : |
|
930
|
0 |
0 |
if ($query eq '') |
|
931
|
0 |
0 |
unless (ref $doc) |
|
944
|
0 |
0 |
if (ref $result) { } |
|
945
|
0 |
0 |
if ($result->isa('XML::LibXML::NodeList')) { } |
|
|
0 |
0 |
elsif ($result->isa('XML::LibXML::Literal')) { } |
|
|
0 |
0 |
elsif ($result->isa('XML::LibXML::Number') or $result->isa('XML::LibXML::Boolean')) { } |
|
963
|
0 |
0 |
if ($doc) |
|
964
|
0 |
0 |
if ($query eq '') { } |
|
968
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
976
|
0 |
0 |
if $XML::XSH::Functions::_xml_module->is_document($node) |
|
986
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->xml_equal($doc, $list->[0])) |
|
996
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->xml_equal($doc, $list->[0])) |
|
1007
|
0 |
0 |
unless $root_element =~ /^\s*
|
|
1014
|
0 |
0 |
if $XML::XSH::Functions::SWITCH_TO_NEW_DOCUMENTS |
|
1036
|
0 |
0 |
if ($_[2] =~ /(?:open)?(?:(?:\s*|_|-)(HTML|XML|DOCBOOK|html|xml|docbook))?(?:(?:\s*|_|-)(FILE|file|PIPE|pipe|STRING|string))?/) { } |
|
1046
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1047
|
0 |
0 |
if ($id eq '' or $file eq '') |
|
1048
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
1051
|
0 |
0 |
if ($source ne 'file' or -f $file or $file eq '-' or $file =~ /^[a-z]+:/) { } |
|
1054
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
1057
|
0 |
0 |
if ($source eq 'pipe') { } |
|
|
0 |
0 |
elsif ($source eq 'string') { } |
|
1059
|
0 |
0 |
unless $F |
|
1060
|
0 |
0 |
if ($format eq 'xml') { } |
|
|
0 |
0 |
elsif ($format eq 'html') { } |
|
|
0 |
0 |
elsif ($format eq 'docbook') { } |
|
1070
|
0 |
0 |
unless $root_element =~ /^\s*
|
|
1077
|
0 |
0 |
if ($format eq 'xml') { } |
|
|
0 |
0 |
elsif ($format eq 'html') { } |
|
|
0 |
0 |
elsif ($format eq 'docbook') { } |
|
1085
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
1087
|
0 |
0 |
if $XML::XSH::Functions::SWITCH_TO_NEW_DOCUMENTS |
|
1108
|
0 |
0 |
unless (exists $XML::XSH::Functions::_doc{$id}) |
|
1111
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
1114
|
0 |
0 |
if ($_->[0] == $XML::XSH::Functions::_doc{$id}) |
|
1119
|
0 |
0 |
if (xsh_local_id() eq $id) |
|
1120
|
0 |
0 |
if ($XML::XSH::Functions::_doc{'scratch'}) { } |
|
1131
|
0 |
0 |
if ($file =~ /^\s*[|>]/) { } |
|
|
0 |
0 |
elsif ($file =~ /.gz\s*$/) { } |
|
1152
|
0 |
0 |
if $xinc{'parse'} eq '' |
|
1163
|
0 |
0 |
unless ref $node |
|
1164
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($node) or $XML::XSH::Functions::_xml_module->is_document($node)) { } |
|
1165
|
0 |
0 |
if $XML::XSH::Functions::_xml_module->is_element($node) |
|
1168
|
0 |
0 |
if (is_xinclude($child)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_xinclude_end($child)) { } |
|
1176
|
0 |
0 |
if ($expanded) { } |
|
1185
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_xinclude_start($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_xinclude_end($node)) { } |
|
1188
|
0 |
0 |
if $XML::XSH::Functions::_xml_module->is_element($node) |
|
1191
|
0 |
0 |
if ($nested > 0) { } |
|
|
0 |
0 |
elsif (not $node and $XML::XSH::Functions::_xml_module->is_xinclude_start($child)) { } |
|
|
0 |
0 |
elsif ($xinc{'parse'} ne 'text' and $elements == 0) { } |
|
|
0 |
0 |
elsif ($xinc{'parse'} ne 'xml' and $elements > 1) { } |
|
|
0 |
0 |
elsif ($xinc{'parse'} eq 'text' and $elements > 0) { } |
|
1215
|
0 |
0 |
if $expanded |
|
1224
|
0 |
0 |
if $XML::XSH::Functions::_xml_module->is_element($node) |
|
1233
|
0 |
0 |
unless @$nodes > 0 |
|
1235
|
0 |
0 |
if ($XML::XSH::Functions::BACKUPS) |
|
1240
|
0 |
0 |
unless $F |
|
1242
|
0 |
0 |
if ($parse eq 'text') { } |
|
1247
|
0 |
0 |
$doc->can('getVersion') ? : |
|
1263
|
0 |
0 |
unless (ref $doc) |
|
1269
|
0 |
0 |
if ($type =~ /save(?:as|_as|-as)?(?:(?:\s*|_|-)(HTML|html|XML|xml|XINCLUDE|Xinclude|xinclude))?(?:(?:\s*|_|-)(FILE|file|PIPE|pipe|STRING|string))?/) |
|
1270
|
0 |
0 |
if $1 |
|
1271
|
0 |
0 |
if $2 |
|
1274
|
0 |
0 |
if ($target eq 'file' and $file eq '') |
|
1276
|
0 |
0 |
if ($XML::XSH::Functions::BACKUPS) |
|
1283
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1285
|
0 |
0 |
if ($format eq 'xinclude') { } |
|
1286
|
0 |
0 |
if ($format ne 'file') { } |
|
1292
|
0 |
0 |
if ($format eq 'xml') { } |
|
|
0 |
0 |
elsif ($format eq 'html') { } |
|
|
0 |
0 |
elsif ($format eq 'docbook') { } |
|
1293
|
0 |
0 |
if (lc $XML::XSH::Functions::_xml_module->doc_encoding($doc) ne lc $enc and not $XML::XSH::Functions::_xml_module->doc_encoding($doc) eq '' && lc $enc eq 'utf-8') |
|
1299
|
0 |
0 |
if ($target eq 'file') { } |
|
|
0 |
0 |
elsif ($target eq 'pipe') { } |
|
|
0 |
0 |
elsif ($target eq 'string') { } |
|
1300
|
0 |
0 |
if ($file =~ /\.gz\s*$/) { } |
|
1313
|
0 |
0 |
if ($file =~ /^\$?([a-zA-Z_][a-zA-Z0-9_]*)$/) { } |
|
1322
|
0 |
0 |
if ($target eq 'file') { } |
|
|
0 |
0 |
elsif ($target eq 'pipe') { } |
|
|
0 |
0 |
elsif ($target eq 'string') { } |
|
1323
|
0 |
0 |
unless $F = open_io_file($file) |
|
1328
|
0 |
0 |
unless $F |
|
1332
|
0 |
0 |
unless $XML::XSH::Functions::_xml_module->has_dtd($doc) |
|
1337
|
0 |
0 |
unless $target eq 'string' |
|
1343
|
0 |
0 |
unless $@ or "$XML::XSH::Functions::QUIET" |
|
1360
|
0 |
0 |
$element->hasChildNodes ? : |
|
1374
|
0 |
0 |
$element->hasChildNodes ? : |
|
1381
|
0 |
0 |
if ($node) |
|
1382
|
0 |
0 |
if (ref $node and $XML::XSH::Functions::_xml_module->is_element($node) and $folding and $node->hasAttributeNS($XML::XSH::xshNS, 'fold')) |
|
1384
|
0 |
0 |
if ($depth >= 0) { } |
|
1391
|
0 |
0 |
if ($depth < 0 and not $folding) { } |
|
|
0 |
0 |
elsif (ref $node and $XML::XSH::Functions::_xml_module->is_element($node) and $depth == 0) { } |
|
|
0 |
0 |
elsif ($depth > 0 or $folding) { } |
|
1392
|
0 |
0 |
ref $node ? : |
|
1394
|
0 |
0 |
$node->hasChildNodes ? : |
|
1397
|
0 |
0 |
if (not ref $node) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_element($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_document($node)) { } |
|
1404
|
0 |
0 |
if ($node->can('getVersion') and $node->can('getEncoding')) |
|
1405
|
0 |
0 |
$node->getEncoding ne '' ? : |
|
1412
|
0 |
0 |
$XML::XSH::Functions::SKIP_DTD ? : |
|
1417
|
0 |
0 |
ref $node ? : |
|
1428
|
0 |
0 |
if ($depth =~ /^fold/) |
|
1432
|
0 |
0 |
unless (ref $doc) |
|
1435
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1439
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1442
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1445
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
1454
|
0 |
0 |
unless (ref $doc) |
|
1457
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1466
|
0 |
0 |
unless exists $namespaces{$ns->getName} |
|
1474
|
0 |
0 |
$_ ne '' ? : |
|
1484
|
0 |
0 |
if $depth eq '' |
|
1488
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($node)) |
|
1500
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($node) and $node->hasAttributeNS($XML::XSH::xshNS, 'fold')) |
|
1514
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1515
|
0 |
0 |
unless (ref $doc) |
|
1522
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
1531
|
0 |
0 |
if $id eq '' or $query eq '' |
|
1532
|
0 |
0 |
unless (ref $doc) |
|
1535
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
1538
|
0 |
0 |
if ($query =~ /^%/) { } |
|
1543
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1545
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1556
|
0 |
0 |
if (not ref $result) { } |
|
1559
|
0 |
0 |
if ($result->isa('XML::LibXML::NodeList')) { } |
|
1560
|
0 |
0 |
if (wantarray) { } |
|
|
0 |
0 |
elsif ($result->[0]) { } |
|
1579
|
0 |
0 |
unless (ref $doc) |
|
1590
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
1597
|
0 |
0 |
if defined $val |
|
1600
|
0 |
0 |
if $@ |
|
1608
|
0 |
0 |
unless exists $XML::XSH::Functions::_nodelist{$var} |
|
1609
|
0 |
0 |
unless ref(my $list = $XML::XSH::Functions::_nodelist{$var}) |
|
1615
|
0 |
0 |
ref $crit eq 'ARRAY' ? : |
|
1623
|
0 |
0 |
if $@ |
|
1637
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1638
|
0 |
0 |
unless ($doc) |
|
1646
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_element($node)) { } |
|
|
0 |
0 |
elsif ($node->can('setData') and $node->can('getData')) { } |
|
1651
|
0 |
0 |
if ($node->can('setName')) { } |
|
1668
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
1669
|
0 |
0 |
unless ($doc) |
|
1677
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_attribute($node) or $XML::XSH::Functions::_xml_module->is_element($node) or $XML::XSH::Functions::_xml_module->is_pi($node)) |
|
1680
|
0 |
0 |
if ($node->can('setName')) { } |
|
1693
|
0 |
0 |
if ($ns eq '') { } |
|
1702
|
0 |
0 |
if ($_[0] =~ /^([^:]+):/) |
|
1712
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($node) and not $node->hasChildNodes) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_document_fragment($node)) { } |
|
1714
|
0 |
0 |
if $ns eq '' |
|
1715
|
0 |
0 |
if ($ns eq '' and name_prefix($node->getName) ne '') |
|
1764
|
0 |
0 |
unless $parent |
|
1765
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_document($parent)) { } |
|
1769
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($source)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_pi($source) or $XML::XSH::Functions::_xml_module->is_comment($source) or $XML::XSH::Functions::_xml_module->is_entity_reference($source) or $XML::XSH::Functions::_xml_module->is_document_fragment($source)) { } |
|
1770
|
0 |
0 |
if ($where eq 'after') { } |
|
|
0 |
0 |
elsif ($where eq 'before') { } |
|
|
0 |
0 |
elsif ($where eq 'replace') { } |
|
1771
|
0 |
0 |
if ($parent->getDocumentElement) { } |
|
1780
|
0 |
0 |
if ($parent->getDocumentElement) { } |
|
1790
|
0 |
0 |
if ($parent->getDocumentElement) { } |
|
1791
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($dest)) { } |
|
1811
|
0 |
0 |
if ($where eq 'after') { } |
|
|
0 |
0 |
elsif ($where eq 'before') { } |
|
|
0 |
0 |
elsif ($where eq 'replace') { } |
|
1826
|
0 |
0 |
if ($where eq 'after') { } |
|
|
0 |
0 |
elsif ($where eq 'before') { } |
|
|
0 |
0 |
elsif ($where eq 'replace') { } |
|
1844
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_document($node)) |
|
1849
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_attribute($dest)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_document($dest)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_element($dest)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_text($dest) or $XML::XSH::Functions::_xml_module->is_cdata_section($dest) or $XML::XSH::Functions::_xml_module->is_comment($dest) or $XML::XSH::Functions::_xml_module->is_pi($dest) or $XML::XSH::Functions::_xml_module->is_entity_reference($dest)) { } |
|
1851
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_text($node) or $XML::XSH::Functions::_xml_module->is_cdata_section($node) or $XML::XSH::Functions::_xml_module->is_comment($node) or $XML::XSH::Functions::_xml_module->is_element($node) or $XML::XSH::Functions::_xml_module->is_pi($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
1856
|
0 |
0 |
$XML::XSH::Functions::_xml_module->is_element($node) ? : |
|
1858
|
0 |
0 |
if ($where eq 'replace' or $where eq 'into') { } |
|
|
0 |
0 |
elsif ($where eq 'before' or $where eq 'prepend') { } |
|
|
0 |
0 |
elsif ($where eq 'after' or $where eq 'append') { } |
|
1878
|
0 |
0 |
if ($where eq 'replace' or $where eq 'after' or $where eq 'before') { } |
|
1880
|
0 |
0 |
if $ns eq '' |
|
1881
|
0 |
0 |
if ($ns eq '' and name_prefix($name) ne '') |
|
1887
|
0 |
0 |
if ($where eq 'replace' and $name ne $dest->getName) { } |
|
1896
|
0 |
0 |
if ($where eq 'append') { } |
|
|
0 |
0 |
elsif ($where eq 'into') { } |
|
|
0 |
0 |
elsif ($where eq 'prepend') { } |
|
1913
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_attribute($node) or $XML::XSH::Functions::_xml_module->is_text($node) or $XML::XSH::Functions::_xml_module->is_cdata_section($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_element($node)) { } |
|
1925
|
0 |
0 |
if ($where =~ /^(?:after|append|into)/) { } |
|
|
0 |
0 |
elsif ($where =~ /^(?:before|prepend)/) { } |
|
|
0 |
0 |
elsif ($where eq 'replace') { } |
|
1936
|
0 |
0 |
if ($destnode) { } |
|
1945
|
0 |
0 |
if ($where =~ /^(?:after|append|into)/) { } |
|
|
0 |
0 |
elsif ($where =~ /^(?:before|prepend)/) { } |
|
|
0 |
0 |
elsif ($where eq 'replace') { } |
|
1961
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
1963
|
0 |
0 |
if $ns eq '' |
|
1964
|
0 |
0 |
if ($ns eq '' and name_prefix($node->getName) ne '') |
|
1968
|
0 |
0 |
if ($where eq 'into' or $where eq 'append' or $where eq 'prepend') { } |
|
|
0 |
0 |
elsif ($where eq 'replace') { } |
|
1972
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($parent)) { } |
|
2002
|
0 |
0 |
if ($where eq 'after' or $where eq 'before' or $where eq 'replace') { } |
|
|
0 |
0 |
elsif ($where eq 'into' or $where eq 'append') { } |
|
|
0 |
0 |
elsif ($where eq 'prepend') { } |
|
2007
|
0 |
0 |
if ($dest->hasChildNodes) { } |
|
2022
|
0 |
0 |
if ($where =~ /^(?:into|append|prepend)$/ and $XML::XSH::Functions::_xml_module->is_entity_reference($dest) || $XML::XSH::Functions::_xml_module->is_entity_reference($node)) |
|
2029
|
0 |
0 |
if ($where eq 'into') { } |
|
|
0 |
0 |
elsif ($where eq 'append') { } |
|
|
0 |
0 |
elsif ($where eq 'prepend') { } |
|
|
0 |
0 |
elsif ($where eq 'replace' and $XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
2030
|
0 |
0 |
$XML::XSH::Functions::_xml_module->is_element($node) ? : |
|
2034
|
0 |
0 |
$XML::XSH::Functions::_xml_module->is_element($node) ? : |
|
2038
|
0 |
0 |
$XML::XSH::Functions::_xml_module->is_element($node) ? : |
|
2046
|
0 |
0 |
if $ns eq '' |
|
2047
|
0 |
0 |
if ($ns eq '' and name_prefix($node->getName) ne '') |
|
2051
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_element($parent)) |
|
2059
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
2077
|
0 |
0 |
if ($where =~ /^(?:after|before|replace)$/) |
|
2094
|
0 |
0 |
unless (ref $fdoc) |
|
2097
|
0 |
0 |
unless (ref $tdoc) |
|
2105
|
0 |
0 |
unless (@$tl) |
|
2106
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
2110
|
0 |
0 |
if ($all_to_all) { } |
|
2116
|
0 |
0 |
if ($replace) |
|
2124
|
0 |
0 |
if ($replace eq 'remove') |
|
2130
|
0 |
0 |
if ($some_nodes_removed) |
|
2141
|
0 |
0 |
if ($exp =~ /\G\s*([^ \n\r\t=]+)=/cogs) { } |
|
2143
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2144
|
0 |
0 |
if ($exp =~ /\G"((?:[^\\"]|\\.)*)"/cogs or $exp =~ /\G'((?:[^\\']|\\.)*)'/cogs or $exp =~ /\G(.*?\S)(?=\s*[^ \n\r\t=]+=|\s*$)/cogs) { } |
|
2149
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2167
|
0 |
0 |
if ($name =~ /^([^:>]+):(.*)$/) { } |
|
2169
|
0 |
0 |
if $ns eq '' |
|
2170
|
0 |
0 |
if ($dest and $XML::XSH::Functions::_xml_module->is_element($dest)) { } |
|
2179
|
0 |
0 |
if (ref $attrs) |
|
2181
|
0 |
0 |
if ($ns ne '' and $_->[0] =~ /^$prefix:/) { } |
|
|
0 |
0 |
elsif ($_->[0] eq 'xmlns:(.*)') { } |
|
|
0 |
0 |
elsif ($_->[0] =~ /^([^:>]+):/) { } |
|
2182
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2186
|
0 |
0 |
unless ($1 eq $ns or $dest->lookupNamespaceURI($1) eq $_->[2]) |
|
2187
|
0 |
0 |
unless $_->[1] eq $ns |
|
2191
|
0 |
0 |
if ($_->[2] ne '') { } |
|
2198
|
0 |
0 |
if $_->[0] eq "xmlns:$prefix" and $_->[1] eq $ns |
|
2211
|
0 |
0 |
if ($type eq 'attribute') { } |
|
|
0 |
0 |
elsif ($type eq 'element') { } |
|
|
0 |
0 |
elsif ($type eq 'text') { } |
|
|
0 |
0 |
elsif ($type eq 'entity_reference') { } |
|
|
0 |
0 |
elsif ($type eq 'cdata') { } |
|
|
0 |
0 |
elsif ($type eq 'pi') { } |
|
|
0 |
0 |
elsif ($type eq 'comment') { } |
|
2214
|
0 |
0 |
if ($_->[0] =~ /^([^:]+):/ and $1 ne 'xmlns') { } |
|
2215
|
0 |
0 |
if $ns eq '' |
|
2224
|
0 |
0 |
if ($exp =~ m[^\]+)(\s+.*)?(?:/?\>)?\s*$]) { } |
|
2225
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2226
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2229
|
0 |
0 |
if ($elt =~ /^([^:>]+):(.*)$/) { } |
|
2230
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2231
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2232
|
0 |
0 |
if $ns eq '' |
|
2237
|
0 |
0 |
if ($att ne '') |
|
2240
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2241
|
0 |
0 |
if ($elt =~ /^([^:]+):/ and $1 ne 'xmlns') { } |
|
2242
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2243
|
0 |
0 |
if $ns eq '' |
|
2252
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
2256
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2259
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2262
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2267
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2272
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2287
|
0 |
0 |
unless ref $tdoc |
|
2291
|
0 |
0 |
if (not $type eq 'chunk') { } |
|
2294
|
0 |
0 |
unless @nodes |
|
2296
|
0 |
0 |
unless ($exp =~ /^\s*]*encoding=[^>]*?>/) |
|
2303
|
0 |
0 |
if ($to_all) { } |
|
|
0 |
0 |
elsif ($tl->[0]) { } |
|
2309
|
0 |
0 |
if ($replace) |
|
2316
|
0 |
0 |
if (ref $tl->[0]) |
|
2317
|
0 |
0 |
if (insert_node($node, $tl->[0], $tdoc, $where) eq 'remove') |
|
2324
|
0 |
0 |
if ($some_nodes_removed) |
|
2335
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
2336
|
0 |
0 |
unless (ref $doc) |
|
2358
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
2359
|
0 |
0 |
unless (ref $doc) |
|
2364
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_text($node) or $XML::XSH::Functions::_xml_module->is_cdata_section($node) or $XML::XSH::Functions::_xml_module->is_comment($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_pi($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_attribute($node)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_element($node) or $XML::XSH::Functions::_xml_module->is_document($node)) { } |
|
2371
|
0 |
0 |
if ($data ne '') { } |
|
2387
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_text($child) or $XML::XSH::Functions::_xml_module->is_cdata_section($child)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_element($child) or $XML::XSH::Functions::_xml_module->is_pi($child)) { } |
|
2390
|
0 |
0 |
if ($data ne '') { } |
|
2407
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->is_text($child) or $XML::XSH::Functions::_xml_module->is_cdata_section($child)) { } |
|
|
0 |
0 |
elsif ($XML::XSH::Functions::_xml_module->is_element($child) or $XML::XSH::Functions::_xml_module->is_pi($child)) { } |
|
2410
|
0 |
0 |
if ($data ne '') { } |
|
2444
|
0 |
0 |
unless (ref $doc) |
|
2448
|
0 |
0 |
if ($doc->can('is_valid')) { } |
|
2449
|
0 |
0 |
if (@schema) { } |
|
2452
|
0 |
0 |
if ($type eq 'DTD') { } |
|
|
0 |
0 |
elsif ($type eq 'RNG') { } |
|
|
0 |
0 |
elsif ($type eq 'XSD') { } |
|
2454
|
0 |
0 |
unless eval {
do {
'XML::LibXML::Dtd'->can('new')
}
} |
|
2456
|
0 |
0 |
if ($format eq 'FILE') { } |
|
|
0 |
0 |
elsif ($format eq 'STRING') { } |
|
2468
|
0 |
0 |
if ($show_errors) { } |
|
2471
|
0 |
0 |
$doc->is_valid($dtd) ? : |
|
2474
|
0 |
0 |
unless eval {
do {
'XML::LibXML::RelaxNG'->can('new')
}
} |
|
2477
|
0 |
0 |
if ($format eq 'FILE') { } |
|
|
0 |
0 |
elsif ($format eq 'STRING') { } |
|
|
0 |
0 |
elsif ($format eq 'DOC') { } |
|
2483
|
0 |
0 |
unless (ref $rngdoc) |
|
2491
|
0 |
0 |
if ($show_errors) { } |
|
2494
|
0 |
0 |
$@ ? : |
|
2497
|
0 |
0 |
unless eval {
do {
'XML::LibXML::Schema'->can('new')
}
} |
|
2500
|
0 |
0 |
if ($format eq 'FILE') { } |
|
|
0 |
0 |
elsif ($format eq 'STRING') { } |
|
|
0 |
0 |
elsif ($format eq 'DOC') { } |
|
2506
|
0 |
0 |
unless (ref $xsddoc) |
|
2514
|
0 |
0 |
if ($show_errors) { } |
|
2517
|
0 |
0 |
$@ ? : |
|
2521
|
0 |
0 |
if ($show_errors) { } |
|
2524
|
0 |
0 |
$doc->is_valid ? : |
|
2537
|
0 |
0 |
unless (ref $doc) |
|
2548
|
0 |
0 |
unless (ref $doc) |
|
2553
|
0 |
0 |
if ($dtd) |
|
2563
|
0 |
0 |
unless (ref $doc) |
|
2573
|
0 |
0 |
unless (ref $doc) |
|
2583
|
0 |
0 |
unless (ref $doc) |
|
2586
|
0 |
0 |
if $standalone =~ /yes/i |
|
2587
|
0 |
0 |
if $standalone =~ /no/i |
|
2595
|
0 |
0 |
unless (ref $doc) |
|
2610
|
0 |
0 |
if $id2 eq '' or $id2 eq '' or not ref $doc |
|
2611
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
2616
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
2624
|
0 |
0 |
if ($XML::XSH::Functions::_xml_module->xml_equal($nodea, $nodeb)) |
|
2636
|
0 |
0 |
if (is_ancestor_or_self($node, $XML::XSH::Functions::LOCAL_NODE)) |
|
2641
|
0 |
0 |
if ($trim_space) |
|
2643
|
0 |
0 |
if ($sibling and $XML::XSH::Functions::_xml_module->is_text($sibling) and $sibling->getData =~ /^\s+$/) |
|
2660
|
0 |
0 |
unless (ref $doc) |
|
2665
|
0 |
0 |
if (copy(@_)) { } |
|
2670
|
0 |
0 |
if ($i) |
|
2694
|
0 |
0 |
if (wantarray) { } |
|
2696
|
0 |
0 |
if $@ |
|
2700
|
0 |
0 |
if $@ |
|
2716
|
0 |
0 |
if (not chdir $_[0]) { } |
|
2720
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
2727
|
0 |
0 |
unless ref $_[0] eq 'ARRAY' |
|
2736
|
0 |
0 |
unless $top_level |
|
2740
|
0 |
0 |
if $trapsignals |
|
2741
|
0 |
0 |
if $trapsignals |
|
2743
|
0 |
0 |
if (ref $run eq 'ARRAY') { } |
|
2745
|
0 |
0 |
if ($cmd eq 'test-mode') |
|
2746
|
0 |
0 |
if ($cmd eq 'run-mode') |
|
2747
|
0 |
0 |
if $XML::XSH::Functions::TEST_MODE |
|
2759
|
0 |
0 |
if (not $trapsignals and $@ =~ /^SIGINT|^SIGPIPE/) { } |
|
2769
|
0 |
0 |
if $XML::XSH::Functions::TEST_MODE |
|
2774
|
0 |
0 |
unless ref $cmd eq 'ARRAY' |
|
2776
|
0 |
0 |
if ($pipe ne '') |
|
2779
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2781
|
0 |
0 |
unless open PIPE, "| $pipe" |
|
2791
|
0 |
0 |
if $@ |
|
2799
|
0 |
0 |
unless ref $cmd eq 'ARRAY' |
|
2800
|
0 |
0 |
if ($name ne '') |
|
2802
|
0 |
0 |
if $XML::XSH::Functions::DEBUG |
|
2809
|
0 |
0 |
unless $@ |
|
2813
|
0 |
0 |
if $@ |
|
2823
|
0 |
0 |
if (ref $xp eq 'ARRAY') { } |
|
2828
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::LoopTerminatingException')) { } |
|
|
0 |
0 |
elsif ($@) { } |
|
2829
|
0 |
0 |
if ($@->label =~ /^(?:next|last|redo)$/ and $@->[1] > 1) |
|
2833
|
0 |
0 |
if ($@->label eq 'next') { } |
|
|
0 |
0 |
elsif ($@->label eq 'last') { } |
|
|
0 |
0 |
elsif ($@->label eq 'redo') { } |
|
2851
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::LoopTerminatingException')) { } |
|
|
0 |
0 |
elsif ($@) { } |
|
2852
|
0 |
0 |
if ($@->label =~ /^(?:next|last|redo)$/ and $@->[1] > 1) |
|
2856
|
0 |
0 |
if ($@->label eq 'next') { } |
|
|
0 |
0 |
elsif ($@->label eq 'last') { } |
|
|
0 |
0 |
elsif ($@->label eq 'redo') { } |
|
2886
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::UncatchableException')) { } |
|
|
0 |
0 |
elsif ($@) { } |
|
2889
|
0 |
0 |
if ($@ =~ /^SIGINT/) { } |
|
2892
|
0 |
0 |
unless ref $@ |
|
2893
|
0 |
0 |
if (ref $var and @{$var;} > 1) { } |
|
2904
|
0 |
0 |
if $@ |
|
2906
|
0 |
0 |
if ref $var |
|
2929
|
0 |
0 |
if (ref $xp eq 'ARRAY') { } |
|
2931
|
0 |
0 |
unless (ref $doc) |
|
2944
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::LoopTerminatingException')) { } |
|
|
0 |
0 |
elsif ($@) { } |
|
2945
|
0 |
0 |
if ($@->label =~ /^(?:next|last|redo)$/ and $@->[1] > 1) |
|
2949
|
0 |
0 |
if ($@->label eq 'next') { } |
|
|
0 |
0 |
elsif ($@->label eq 'last') { } |
|
|
0 |
0 |
elsif ($@->label eq 'redo') { } |
|
2969
|
0 |
0 |
if $@ |
|
2975
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::LoopTerminatingException')) { } |
|
|
0 |
0 |
elsif ($@) { } |
|
2976
|
0 |
0 |
if ($@->label =~ /^(?:next|last|redo)$/ and $@->[1] > 1) |
|
2980
|
0 |
0 |
if ($@->label eq 'next') { } |
|
|
0 |
0 |
elsif ($@->label eq 'last') { } |
|
|
0 |
0 |
elsif ($@->label eq 'redo') { } |
|
3003
|
0 |
0 |
if (not defined $xp or (ref $xp eq 'ARRAY' and count($xp) or not ref $xp and perl_eval($xp))) |
|
3015
|
0 |
0 |
if (not ref $xp eq 'ARRAY' && count($xp) || !ref($xp) && perl_eval($xp)) { } |
|
3019
|
0 |
0 |
ref $else ? : |
|
3029
|
0 |
0 |
if "$XML::XSH::Functions::DEBUG" |
|
3030
|
0 |
0 |
unless $XML::XSH::Functions::_doc{$id} |
|
3032
|
0 |
0 |
if ref $params |
|
3033
|
0 |
0 |
if ($XML::XSH::Functions::DEBUG) |
|
3038
|
0 |
0 |
if (-f $stylefile or $stylefile =~ /^[a-z]+:/) { } |
|
3060
|
0 |
0 |
if (get_doc($xupdate_id) and get_doc($id)) { } |
|
3067
|
0 |
0 |
if (get_doc($xupdate_id)) { } |
|
3082
|
0 |
0 |
if (exists $XML::XSH::Functions::_defs{$name}) { } |
|
3084
|
0 |
0 |
if (ref $args) |
|
3091
|
0 |
0 |
if (ref $args) |
|
3095
|
0 |
0 |
if (defined $var) |
|
3096
|
0 |
0 |
if ($var =~ /^\$/) { } |
|
|
0 |
0 |
elsif ($var =~ /^\%(.*)$/) { } |
|
3109
|
0 |
0 |
if ref $args |
|
3112
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::SubTerminatingException')) |
|
3116
|
0 |
0 |
if $@ |
|
3126
|
0 |
0 |
if (exists $XML::XSH::Functions::_defs{$name}) { } |
|
3130
|
0 |
0 |
if /^$name$/ |
|
3139
|
0 |
0 |
if (exists $XML::XSH::Functions::_defs{$name}) |
|
3141
|
0 |
0 |
if ($prevcmd) { } |
|
|
0 |
0 |
elsif (not $command) { } |
|
3148
|
0 |
0 |
if (@$args != @prevargs) |
|
3155
|
0 |
0 |
if (substr($parg, 0, 1) ne substr($_, 0, 1)) |
|
3183
|
0 |
0 |
unless "$XML::XSH::Functions::QUIET" |
|
3185
|
0 |
0 |
if (open F, "$file") { } |
|
3196
|
0 |
0 |
if (not $conditionally && $XML::XSH::Functions::_includes{$f}) |
|
3206
|
0 |
0 |
if ($command) { } |
|
3207
|
0 |
0 |
if (exists $XML::XSH::Help::HELP{$command}) { } |
|
3214
|
0 |
0 |
if (keys %h == 1) { } |
|
|
0 |
0 |
elsif (keys %h > 1) { } |
|
3249
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::LoopTerminatingException')) { } |
|
|
0 |
0 |
elsif ($@) { } |
|
3250
|
0 |
0 |
if ($@->label =~ /^(?:next|redo)$/ and $@->[1] > 1) |
|
3254
|
0 |
0 |
if ($@->label eq 'next') { } |
|
|
0 |
0 |
elsif ($@->label eq 'redo') { } |
|
3274
|
0 |
0 |
if $@ |
|
3288
|
0 |
0 |
if ($otype =~ /pipe/i) { } |
|
|
0 |
0 |
elsif ($otype =~ /string/i) { } |
|
3290
|
0 |
0 |
unless $out |
|
3292
|
0 |
0 |
if ($output =~ /^\$?([a-zA-Z_][a-zA-Z0-9_]*)$/) { } |
|
|
0 |
0 |
elsif (ref($XML::XSH::Functions::OUT) =~ /Term::ReadLine/) { } |
|
3323
|
0 |
0 |
if ($itype =~ /pipe/i) { } |
|
|
0 |
0 |
elsif ($itype =~ /string/i) { } |
|
3325
|
0 |
0 |
unless $F |
|
3333
|
0 |
0 |
if ($otype =~ /pipe/i) |
|
3336
|
0 |
0 |
if ($termout) |
|
3343
|
0 |
0 |
unless get_local_node(_id()) |
|
3348
|
0 |
0 |
if defined $filter |
|
3350
|
0 |
0 |
if ($nodefilter eq 'comment()') |
|
3352
|
0 |
0 |
if ($nodefilter eq 'text()') { } |
|
|
0 |
0 |
elsif ($nodefilter =~ /processing-instruction\((\s*['"]([^'"]+)['"]\s*)?\)$/) { } |
|
|
0 |
0 |
elsif ($nodefilter eq 'node()') { } |
|
|
0 |
0 |
elsif ($nodefilter =~ /^(?:([^:]+):)?(.+)$/) { } |
|
3356
|
0 |
0 |
if $1 ne '' |
|
3361
|
0 |
0 |
unless $2 eq '*' |
|
3362
|
0 |
0 |
if ($1 ne '') |
|
3364
|
0 |
0 |
if $ns eq '' |
|
3369
|
0 |
0 |
if $filter =~ /^\d+$/ |
|
3370
|
0 |
0 |
if ($filter ne '') |
|
3382
|
0 |
0 |
unless defined $iterator |
|
3393
|
0 |
0 |
if (ref $@ and $@->isa('XML::XSH::Internal::LoopTerminatingException')) { } |
|
|
0 |
0 |
elsif ($@) { } |
|
3394
|
0 |
0 |
if ($@->label =~ /^(?:next|last|redo|prev)$/ and $@->[1] > 1) |
|
3398
|
0 |
0 |
if ($@->label eq 'next') { } |
|
|
0 |
0 |
elsif ($@->label eq 'prev') { } |
|
|
0 |
0 |
elsif ($@->label eq 'last') { } |
|
|
0 |
0 |
elsif ($@->label eq 'redo') { } |
|
3399
|
0 |
0 |
unless $iterator->next |
|
3402
|
0 |
0 |
unless $iterator->prev |
|
3414
|
0 |
0 |
unless $iterator->next |
|
3423
|
0 |
0 |
if $@ |
|
3429
|
0 |
0 |
if (ref $XML::XSH::Functions::_on_exit) |
|
3452
|
0 |
0 |
if ($code =~ /^\s*{/) { } |
|
|
0 |
0 |
elsif ($code =~ /^\s*([A-Za-z_][A-Za-z_0-9]*(::[A-Za-z_][A-Za-z_0-9]*)*)\s*$/) { } |
|
3455
|
0 |
0 |
if ($2 ne '') { } |
|
3463
|
0 |
0 |
if $@ |
|
3464
|
0 |
0 |
if ($name =~ /^([^:]+):(.*)$/) { } |
|
3465
|
0 |
0 |
if (exists $XML::XSH::Functions::_ns{$1}) { } |
|
3512
|
0 |
0 |
unless (ref $doc) |
|
3532
|
0 |
0 |
if $xp eq '' |
|
3536
|
0 |
0 |
unless (ref $doc) |
|
3545
|
0 |
0 |
if ($xm->is_element($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_attribute($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_text($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_cdata_section($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_pi($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_entity_reference($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_document($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_document_fragment($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_comment($_)) { } |
|
|
0 |
0 |
elsif ($xm->is_namespace($_)) { } |
|
3568
|
0 |
0 |
unless wantarray |
|
3648
|
0 |
0 |
if ($data->{'Encoding'}) |