projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
use XML::Parser (it should be adequate for the little things we are doing).
[spider.git]
/
perl
/
DXXml.pm
diff --git
a/perl/DXXml.pm
b/perl/DXXml.pm
index a351510c511f02ca0f8ce450bb3d3906c39f61c1..c29620bbb2cf9a239b1fdb7d86e1a3ce3091f676 100644
(file)
--- a/
perl/DXXml.pm
+++ b/
perl/DXXml.pm
@@
-41,11
+41,16
@@
sub init
{
return unless $main::do_xml;
{
return unless $main::do_xml;
- eval { require XML::Simple; };
- unless ($@) {
+ eval { require XML::Simple };
+ eval { require XML::Parser } unless $@;
+ if ($@) {
+ LogDbg('err', "do_xml was set to 1 and the XML routines failed to load ($@)");
+ $main::do_xml = 0;
+ } else {
+ $XML::Simple::PREFERRED_PARSER = 'XML::Parser';
import XML::Simple;
$DXProt::handle_xml = 1;
import XML::Simple;
$DXProt::handle_xml = 1;
- $xs = new XML::Simple();
+ $xs = new XML::Simple(
Cache=>[]
);
}
undef $@;
}
}
undef $@;
}