#!/usr/bin/perl
use autodie;

use XML::TreePP;
use Data::Dump qw(dump);

my $tpp = XML::TreePP->new();
my $tree = $tpp->parsefile( "abstracts.xml" );

print dump($tree);

