X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=lib%2FConfig%2FAny%2FXML.pm;h=c9b979fa37e3d6145f263ed671c6037b70122f24;hp=9c494434f0c7d8e8bc69a608aedf4408455ea03a;hb=48e4a267ac83f85a46ee54c53052f8831752acac;hpb=a918b0b8b7952db918dfabb8dc72bf34832d43d0 diff --git a/lib/Config/Any/XML.pm b/lib/Config/Any/XML.pm index 9c49443..c9b979f 100644 --- a/lib/Config/Any/XML.pm +++ b/lib/Config/Any/XML.pm @@ -73,6 +73,17 @@ sub _coerce { $out; } +=head2 is_supported( ) + +Returns true if L is available. + +=cut + +sub is_supported { + eval { require XML::Simple; }; + return $@ ? 0 : 1; +} + =head1 AUTHORS Brian Cassidy Ebricas@cpan.orgE