#### my $twig = XML::Twig->new( start_tag_handlers => { 'UML:Class' => \¨_class_start, 'UML:Package' => \¨_package_start, }, twig_handlers => { # purge at the end of each class section 'UML:Class' => sub { $_[0]->purge }, 'UML:Attribute' => \¨_attribute, 'UML:Generalization' => \¨_generalization, 'UML:TaggedValue' => \¨_taggedvalue, }, ); #### my $xmi_id = $elt->att( 'xmi.id' ); my $name = $elt->att( 'name' );