Ondemand based on environment XML parser

This commit is contained in:
fbsanchez 2019-07-30 19:46:16 +02:00
parent f97429fb46
commit 380574b863
1 changed files with 10 additions and 1 deletions

View File

@ -130,7 +130,16 @@ use Text::ParseWords;
# due a bug processing some XML with blank spaces.
# See http://www.perlmonks.org/?node_id=706838
$XML::Simple::PREFERRED_PARSER='XML::SAX::ExpatXS';
eval {
local $SIG{__DIE__};
eval "use XML::SAX::ExpatXS;1" or die "XML::SAX::ExpatXS not available";
};
if (!$@) {
# Force best option available.
$XML::Simple::PREFERRED_PARSER='XML::SAX::ExpatXS';
} else {
# Let ParserDetails.ini command parser.
}
# Default lib dir for RPM and DEB packages
use lib '/usr/lib/perl5';