Help for this page

Select Code to Download


  1. or download this
    Uncaught exception from user code:
            calling depth after parsing is finished at /opt/perl-5.8.6/lib
    +/site_perl/5.8.6/i686-linux/XML/Parser/Expat.pm line 474
     at /opt/perl-5.8.6/lib/site_perl/5.8.6/i686-linux/XML/Parser.pm line 
    +192
            XML::Parser::parse('XML::Twig=HASH(0x81ec750)', '<node id="17"
    +><content>foo bar</content><child file="19.xml" ...') called at 48649
    +7.pl line 9
    
  2. or download this
    sub onChild
    {
    ...
       XML::Twig->new( twig_handlers => { child => \&onChild } ) 
         ->parsefile($atts->{file});
    }