package AxKitSaxTest;

use XML::SAX::Base;
@ISA=qw(XML::SAX::Base);

use Data::Dumper;

use strict;

sub characters{
	my ($self, $data) = @_;
	
	$data->{'Data'} .= '+sax';
	
	$self->SUPER::characters($data);
}
