The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use vars qw($loaded);

use Test::More tests => 4;

use XML::LibXSLT;

# TEST
ok(1, ' TODO : Add test name');

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

# TEST
ok($p, ' TODO : Add test name');

# TEST
is(XML::LibXSLT::LIBXSLT_VERSION(), XML::LibXSLT::LIBXSLT_RUNTIME_VERSION(), 'LIBXSLT_VERSION is the same as the runtime version.');

# TEST
is(XML::LibXML::LIBXML_VERSION(), XML::LibXML::LIBXML_RUNTIME_VERSION(), 'LibXML version is the same as its run time 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";
}