这不是很美观，但是您可以更改XML::Twig输出开始标记的方式。方法是 start_tag ，在XML：：Twig：：Elt中；

最干净的方法是将XML::Twig::Elt子类化(如下面代码中的 my_elt )，并更改原始 start_tag 方法的输出：

#!/usr/bin/env perl
use strict;
use warnings;
use XML::Twig;
# elements will be created as "my_elt" instead of XML::Twig::Elt                      
my $t= XML::Twig->new( elt_class => 'my_elt')  
                ->parse( '<data id="010" name="Common"> text </data>')
                ->print;
# create a new class, based on 'XML::Twig::Elt'
package my_elt;
use base 'XML::Twig::Elt';