The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Test;
BEGIN { plan tests => 4 }
END { ok(0) unless $loaded }
use XML::LibXSLT;
$loaded = 1;
ok(1);

my $p = XML::LibXSLT->new();
ok($p);

ok(XML::LibXSLT::LIBXSLT_VERSION, XML::LibXSLT::LIBXSLT_RUNTIME_VERSION);
ok(XML::LibXML::LIBXML_VERSION, XML::LibXML::LIBXML_RUNTIME_VERSION);

warn "\n\nCompiled against:    ",
       "libxslt ",XML::LibXSLT::LIBXSLT_VERSION,
       ", libxml2 ",XML::LibXML::LIBXML_VERSION,
       "\nRunning:             ",
       "libxslt ",XML::LibXSLT::LIBXSLT_RUNTIME_VERSION,
       ", libxml2 ",XML::LibXML::LIBXML_RUNTIME_VERSION,
       "\nCompiled with EXSLT: ", (XML::LibXSLT::HAVE_EXSLT() ? 'yes' : 'no'),
     "\n\n";

if (XML::LibXSLT::LIBXSLT_VERSION != XML::LibXSLT::LIBXSLT_RUNTIME_VERSION
    or    
    XML::LibXML::LIBXML_VERSION != XML::LibXML::LIBXML_RUNTIME_VERSION	
    ) {
   warn "DO NOT REPORT THIS FAILURE: Your setup of library paths is incorrect!\n\n";
}