use XML::Parser; sub handler_start() { print $_[1], "\n"; } my $parser = new XML::Parser(); $parser->setHandlers( Start => \&handler_start ); $parser->parsefile('test.xml'); ####
TEST