package XML::Generator;
use strict;
use warnings;
use Carp;
use vars qw/$VERSION $AUTOLOAD/;
our $VERSION = '1.09';
=head1 NAME
XML::Generator - Perl extension for generating XML
=head1 SYNOPSIS
use XML::Generator ':pretty';
print foo(bar({ baz => 3 }, bam()),
bar([ 'qux' => 'http://qux.com/' ],
"Hey there, world"));
# OR
require XML::Generator;
my $X = XML::Generator->new(':pretty');
print $X->foo($X->bar({ baz => 3 }, $X->bam()),
$X->bar([ 'qux' => 'http://qux.com/' ],
"Hey there, world"));
Either of the above yield:
Hey there, world
=head1 DESCRIPTION
In general, once you have an XML::Generator object, you then simply call
methods on that object named for each XML tag you wish to generate.
XML::Generator can also arrange for undefined subroutines in the caller's
package to generate the corresponding XML, by exporting an C
subroutine to your package. Just supply an ':import' argument to
your C