While Parsing through XML file using SAX, How can I create object of module which is equivalent to element value ?

I have different modules like Author.pm, BillingPeriod.pm,
Offer.pm,PaymentMethod.pm etc. now in sax whenever I hit the end element tag
I want to create object of module which is equivalent to element value. How
can I achieve this ? For example if am parsing through XML file and sax
parser hit's end element as </offer> than it should create object of
Offer.pm, similarly if sax parser hit's end element tag as </author> than it
should create object of Author.pm Code XML: `books.xml` <?xml version="1.0"
encoding="UTF-8"?> <!--Sample XML file generated by XMLSpy v2009 sp1 (
http://www.altova.com)--> <bks:books xsi:schemaLocation="urn:books
Untitled1.xsd" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xmlns:bks="urn:books"> <book id="String"> <author>String</author>
<authorFirstName>String</authorFirstName>
<authorLastName>String</authorLastName> <title>String</title>
<titleNo>3</titleNo> <genre>String</genre> <offer>String</offer>
<price>3.14159E0</price> <pub_date>1967-08-13</pub_date>
<review>String</review> <reviewsratings></reviewratings> </book>
</bks:books> sax: `perlsaxparsing.pl` #!usr/bin/perl -w use
XML::SAX::ParserFactory; use MySaxHandler; my $handler =
MySaxHandler->new(); my $parser = XML::SAX::ParserFactory->parser(Handler =>
$handler); $parser->parse_uri("books.xml") For example in below example,
assuming that sax is hitting `Price end element tag` so am creating object
of `Price.pm` SAX Parser Handler Module: `MySaxHander.pm` sub end_element {
my($self,$data) = @_; print "\t Ending element:".$data->{Name}."\n"; my $obj
= new Price("1","2","NL","ENUM","DESCRIPTION","2008-01-01
10:00:00","2009-01-01 10:00:00","2008-01-01 10:00:00","USER"); print
$obj->getSQLScript."\n"; $in_books--; } **Question:** While Parsing through
XML file using SAX, How can I create object of module which is equivalent to
element value ?

_______________________________________________
Perl-XML mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs