my $twig = 'XML::Twig'->new( twig_handlers =>  { result => \&record });
$twig->parse($input_xml);