use strict;
use warnings;
use XML::Twig;

my $t= XML::Twig->new(
	twig_handlers => {
		AMS => sub {
			print $_->{att}{Asset_Class}." has name ".$_->{att}{Asset_Name}."\n";
		}
	})->parsefile('test.xml');

##</code><code>##

package has name xxxxxxxxxxxxxxxxxxxxxxxx_package
title has name xxxxxxxxxxxxxxxxxxxxxxxx_title
poster has name xxxxxxxxxxxxxxxxxxxxxxxx_poster
movie has name xxxxxxxxxxxxxxxxxxxxxxxx_movie