为什么 XML::Twig 不调用我的 end_tag_handler？

Question

我尝试为每个标签调用子例程，但从未调用 end_tag_handlers。
我的目标是这个序列：

---sequence---
当调用\&loading时。
当

temp.pl：

#!/usr/local/bin/perl -w

use XML::Twig;
my $twig = XML::Twig->new(
            start_tag_handlers => 
              { 'auto' => \&loading
              },
            twig_handlers =>
              { 'apps/title' => \&kicks,
                'apps/logs' => \&bye
              },
            twig_roots =>
              { 'apps' => \&app
              },
            end_tag_handlers => 
              { 'auto' => \&finish
              }
            );
$twig -> parsefile( "doc.xml");

  sub loading {
    print "---loading--- \n";
  }

  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";
  }

  sub finish {
    print "---fishish--- \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 temp.pl
---loading---
---kicks---
watch
---bye---
csv
---app---
watchset,start,00:00,alart,endcsv
---kicks---
machine
---bye---
dump
---app---
machinedown,select,vol_100,check,line,enddump  

我想在这里了解更多。

---finish---

Answer 1

从 XML::Twig 的文档中：

end_tag_handlers

哈希{表达式=>; \&处理程序}。设置当元素被调用时调用的元素处理程序
已关闭（在 XML::Parser End 处理程序的末尾）。处理程序被调用为 2
params：元素的树枝和标签。

twig_handlers 当一个元素被完全解析时被调用，那么为什么有这个多余的
选项？ end_tag_handlers 只有一种用途：使用 twig_roots 选项时，
触发根外部元素的处理程序。

您正在为 auto 元素（即根元素）设置结束处理程序。而且您仅将 twig_roots 用于应用。所以最终处理程序永远不会被调用。

您应该使用twig_handlers来安装您的处理程序。

所以试试这个：

my $twig = XML::Twig->new(
        start_tag_handlers => 
          { 'auto' => \&loading
          },
        twig_handlers =>
          { 'apps/title' => \&kicks,
            'apps/logs' => \&bye,
            'auto'      => \&finish
          },
        twig_roots =>
          { 'apps' => \&app
          },
        );