&{$self->{handlers}{char}}($self, substr($self->{doc}, $end_pos + 1, $start_pos - $end_pos - 1)) if defined $self->{handlers}{char};
package XML::Lite;
use strict;
=head1 NAME
XML::Lite - A lightweight XML parser for simple files
=head1 SYNOPSIS
use XML::Lite;
my $xml = new XML::Lite( xml => 'a_file.xml' );
=head1 DESCRIPTION
XML::Lite is a lightweight XML parser, with basic element traversing
methods. It is entirely self-contained, pure Perl (i.e. I<not> based on
expat). It provides useful methods for reading most XML files, including
traversing and finding elements, reading attributes and such. It is
designed to take advantage of Perl-isms (Attribute lists are returned as
hashes, rather than, say, lists of objects). It provides only methods
for reading a file, currently.
=head1 METHODS
The following methods are available:
=over 4