和
end_tag_handler在找到apps / logs标记时获取应用程序/日志内容.

但相反,此代码返回null并退出.

这是用于解析的Perl代码(使用XML::Twig)###：

#!/usr/local/bin/perl -w
 
    use XML::Twig;
    my $twig = XML::Twig->new(
                start_tag_handlers =>
                  { 'apps/title' => \&kicks
                  },twig_roots =>
                  { 'apps' => \&app
                  },end_tag_handlers =>
                  { 'apps/logs' => \&bye
                  }
                );
    $twig -> parsefile( "doc.xml");
 
    sub kicks {
        my ($twig,$elt) = @_;
        print "---kicks--- \n";
        print $elt -> text;
        print " \n";
    }
 
    sub app {
        my ($twig,$apps) = @_;
        print "---app--- \n";
        print $apps -> text;
        print " \n";
    }
 
 
    sub bye {
        my ($twig,$elt) = @_;
        print "bye \n";
        print $elt->text;
        print " \n";
    }

这是doc.xml ###：

<?xml version="1.0" encoding="UTF-8"?>
    <auto>
      <apps>
        <title>watch</title>
        <commands>set,start,00:00,alart,end</commands>
        <logs>csv</logs>
      </apps>
      <apps>
        <title>machine</title>
        <commands>down,select,vol_100,check,line,end</commands>
        <logs>dump</logs>
      </apps>
    </auto>

这是控制台###中的输出：

C:\>perl parse.pl
    ---kicks---
 
    ---app---
    watchset,endcsv
    ---kicks---
 
    ---app---
    machinedown,enddump