#!/usr/bin/perl --
use warnings;
use strict;

use XML::LibXML;
print join "\n", XML::LibXML::LIBXML_DOTTED_VERSION(),
XML::LibXML::LIBXML_VERSION(),
XML::LibXML::LIBXML_RUNTIME_VERSION(),
$XML::LibXML::VERSION,
;;;;

my $doc = 'XML::LibXML::Document'->createDocument('1.0', 'utf-8');
$doc->setDocumentElement(my $root = $doc->createElement('root'));
$root->appendText("\x0b");
print $doc->toString;
__END__
2.9.0
20900
20900
2.0014<?xml version="1.0" encoding="utf-8"?>
<root></root>