XML::Output is a Perl module for writing simple XML documents.

SYNOPSIS

use XML::Output;

open(FH,>file.xml);
my $xo = new XML::Output({fh => *FH});
$xo->open(tagname, {attrname => attrval});
$xo->pcdata(element content);
$xo->close();
close(FH);

ABSTRACT

XML::Output is a Perl module for writing simple XML documents

XML::Output is a Perl module for writing simple XML document. The following methods are provided.

new
$xo = new XML::Output;
Constructs a new XML::Output object.

open
$xo->open(tagname, {attrname => attrval});
Open an element with specified name (and optional attributes)

close
$xo->close;
Close an element

empty
$xo->empty(tagname, {attrname => attrval});
Insert an empty element with specified name (and optional attributes)

pcdata
$xo->pcdata(element content);
Insert text

comment
$xo->comment(comment text);
Insert a comment

xmlstr
print $xo->xmlstr;
Get a string representation of the constructed document

[COPYRIGHT]

SYNOPSIS

use XML::DOM::Lite qw(Parser XSLT);
$parser = Parser->new( whitespace => strip );
$xsldoc = $parser->parse($xsl);
$xmldoc = $parser->parse($xml);
$output = XSLT->process($xmldoc, $xsldoc);

WebalizerXML provides a patch for making Webalizer produce XML output.

WebalizerXML is a simple patch for Webalizer that makes it possible to generate XML stats instead of regular HTML files.

It is very useful if you want to show your stats using your own templates or graphics.

It works only on Webalizer 2.01-10.

XML::DifferenceMarkup is a XML diff and merge.

SYNOPSIS

use XML::DifferenceMarkup qw(make_diff);

$parser = XML::LibXML->new();
$parser->keep_blanks(0);
$d1 = $parser->parse_file($fname1);
$d2 = $parser->parse_file($fname2);

$dom = make_diff($d1, $d2);
print $dom->toString(1);

This module implements an XML diff producing XML output. Both input and output are DOM documents, as implemented by XML::LibXML.

The diff format used by XML::DifferenceMarkup is meant to be human-readable (i.e. simple, as opposed to short) - basically the diff is a subset of the input trees, annotated with instruction element nodes specifying how to convert the source tree to the target by inserting and deleting nodes. To prevent name colisions with input trees, all added elements are in a namespace http://www.locus.cz/diffmark (the diff will fail on input trees which already use that namespace).

text-vimcolor is a command-line program to syntax color a file in HTML, XML or PDF.

SYNOPSIS

$ text-vimcolor --format html --full-page FILENAME > OUTPUT.html
$ text-vimcolor --format xml FILENAME > OUTPUT.xml
$ text-vimcolor --format pdf FILENAME --output OUTPUT.pdf

This program uses the Vim text editor to highlight text according to its syntax, and turn the highlighting into HTML, XML or PDF output. It works with any file type which Vim itself can highlight. Usually Vim will be able to autodetect the file format based on the filename (and sometimes the contents of the file).

Exactly one filename should be given on the command line to name the input file. If none is given input will instead be read from stdin (the standard input).
If Vim cant guess the file type automatically, it can be specified explicitly using the --filetype option. For example:

$ text-vimcolor --format html --filetype prolog foo.pl > foo.html

This program is a command line interface to the Perl module Text::VimColor.

OPTIONS

The following options are understood:

--help

Show a summary of the usage, including a list of options.

--debug

Turns on debugging in the underlying Perl module. This makes it print the command used to run Vim.

--filetype file-type

Set the type of the file explicitly. The file-type argument should be something which Vim will recognise when set with its filetype option. Examples are perl, cpp (for C++) and sh (for Unix shell scripts). These names are case sensitive, and should usually be all-lowercase.

--format output-format

The output format to generate. Must be one of the following:
html

Generate XHTML output, with text marked with elements with class attributes. A CSS stylesheet should be used to define the coloring, etc., for the output. See the --full-page option below.

xml

Output is in a simple XML vocabulary. This can then be used by other software to do further transformations (e.g., using XSLT).

pdf

XML output is generated and fed to the FOP XSL-FO processor, with an appropriate XSL style sheet. The stylesheet uses XSLT to transform the normal XML output into XSL-FO, which is then rendered to PDF. For this to work, the command fop must be available. An output file must be specified with --output with this format.

Full details of the HTML and XML output formats can be found in the documentation for Text::VimColor.

--output output-filename

Specifies the name of the output file (which will end up containing either HTML, XML or PDF). If this option is omitted, the output will be sent to stdout (the standard output). This option is required when the output format is PDF (because of limitations in FOP).

--full-page

When the output format is HTML, this option will make the output a complete HTML page, rather than just a fragment of HTML. A CSS stylesheet will be inserted inline into the output, so the output will be useable as it is.

--no-inline-stylesheet

When the output format is HTML and --fullpage is given, a stylesheet is normally inserted in-line in the output file. If this option is given it will instead be referenced with a element.

--let name=value

When Vim is run the value of name will be set to value using Vims let command. More than one of these options can be set. The value is not quoted or escaped in any way, so it can be an expression. These settings take precedence over --unlet options.

This option corresponds to the vim_let setting and method in the Perl module.

--unlet name

Prevent the value of name being set with Vims let command. This can be used to turn off default settings.

This option corresponds to the vim_let setting and method in the Perl module, when used with a value of undef.

PyGNUGK is both a command line tool, a CGI script, and a set of Python classes available as a Python module, which can connect to GNU Gatekeepers status port and return informations about whats there.

PyGNUGK project can currently report the list of registered endpoints and ongoing calls, but more features will be added in the future.

The report can currently be made either in plain text or in XML format.

Command line usage:

$ pygnugk [--xml] [gkhost] [gkport]

* --xml gives an XML report, otherwise plain text is assumed.

* gkhost defaults to localhost.

* gkport defaults to 7000.

CGI usage:

Copy the pygnugk command line tool from /usr/bin to /usr/lib/cgi-bin or create a symlink there.

From your web browser all of these are allowed :

http://yourserver/cgi-bin/pygnugk?host=gkhost&port=gkport

http://yourserver/cgi-bin/pygnugk?host=gkhost&port=gkport&format=xml

http://yourserver/cgi-bin/pygnugk

This one defaults to localhost, port 7000 and format plain

Python module usage:

--- CUT ---
from gnugklib import gnugk

gk = gnugk.GNUGK(host="localhost", port=7000)

# Complete XML output (will grab endpoints and calls automatically) :
print gk.xml()

# Complete text output :
endpoints = gk.getEndPoints()
for endpoint in endpoints :
print endpoint

for call in gk.getCalls() :
print call

# outputs only first endpoint as XML (works with calls too)
if endpoints :
print endpoints[0].xml()
--- CUT ---

Installation:

Download pygnugk from :

http://cortex.unice.fr/~jerome/pygnugk/

and extract it :

$ tar -zxf pygnugk-x.yy.tar.gz

where x.yy is pygnugks version number.

Run the installation script :

$ python setup.py install

This will usually install the pygnugk into /usr/bin and the library into /usr/lib/python2.?/site-packages/gnugk/

Thats all !

NB : if you want to use XML output, you MUST download the jaxml Python module from http://www.librelogiciel.com/software/

If you use a Debian based distribution : apt-get install jaxml

PyQStat project is a Python wrapper around QStat, the realtime game server status tool.

PyQStat invokes QStat via os.popen and parses its XML output mode. Although primarily intended as an importable module for integrating QStat functionality into other applications, PyQStat can also be used from the command line.

XML::DOM::Lite is a Lite Pure Perl XML DOM Parser Kit.

SYNOPSIS

# Parser
use XML::DOM::Lite qw(Parser :constants);

$parser = Parser->new( %options );
$doc = Parser->parse($xmlstr);
$doc = Parser->parseFile(/path/to/file.xml);

# strip whitespace (can be about 30% faster)
$doc = Parser->parse($xml, whitespace => strip);


# All Nodes
$copy = $node->cloneNode($deep);
$nodeType = $node->nodeType;
$parent = $node->parentNode;
$name = $node->nodeName;
$xmlstr = $node->xml;
$owner = $node->ownerDocument;

# Element Nodes
$first = $node->firstChild;
$last = $node->lastChild;
$tag = $node->tagName;
$prev = $node->nextSibling;
$next = $node->previousSibling;

$node->setAttribute("foo", $bar);
$foo = $node->getAttribute("foo");
foreach my $attr (@{$node->attributes}) { # attributes as nodelist
# ... do stuff
}
$node->attributes->{foo} = "bar"; # or as hashref (overload)

$liveNodeList = $node->getElementsByTagName("child"); # deep

$node->insertBefore($newchild, $refchild);
$node->replaceChild($newchild, $refchild);


# Text Nodes
$nodeValue = $node->nodeValue;
$node->nodeValue("new text value");

# Processing Instruction Nodes
# CDATA Nodes
# Comments
$data = $node->nodeValue;

# NodeList
$item = $nodeList->item(42);
$index = $nodeList->nodeIndex($node);
$nlist->insertNode($newNode, $index);
$removed = $nlist->removeNode($node);
$length = $nlist->length; # OR scalar(@$nodeList)


# NodeIterator and NodeFilter
use XML::DOM::Lite qw(NodeIterator :constants);

$niter = NodeIterator->new($rootnode, SHOW_ELEMENT, {
acceptNode => sub {
my $n = shift;
if ($n->tagName eq wantme) {
return FILTER_ACCEPT;
} elsif ($n->tagName eq skipme) {
return FILTER_SKIP;
} else {
return FILTER_REJECT;
}
}
);
while (my $n = $niter->nextNode) {
# do stuff
}

# XSLT
use XML::DOM::Lite qw(Parser XSLT);
$parser = Parser->new( whitespace => strip );
$xsldoc = $parser->parse($xsl);
$xmldoc = $parser->parse($xml);
$output = XSLT->process($xmldoc, $xsldoc);


# XPath
use XML::DOM::Lite qw(XPath);
$result = XPath->evaluate(/path/to/*[@attr="value"], $contextNode);


# Document
$rootnode = $doc->documentElement;
$nodeWithId = $doc->getElementById("my_node_id");
$textnode = $doc->createTextNode("some text string");
$element = $doc->createElement("myTagName");
$docfrag = $doc->createDocumentFragment();
$xmlstr = $doc->xml;
$nlist = $doc->selectNodes(/xpath/expression);
$node = $doc->selectSingleNode(/xpath/expression);


# Serializer
use XML::DOM::Lite qw(Serializer);

$serializer = Serializer->new;
$xmlout = $serializer->serializeToString($node);