use strict;
use warnings;

use XML::Twig;
my $xml = <<XML;
<root>
<para>aaaaaaaaaaaaaaaaa  dsnbbtejk</para>
<para>aldmflskddddddddddddddddddffffffffffffff</para>
</root>
XML

my $tmp = XML::Twig->new();
$tmp->parse ($xml);
my $root = $tmp->root;

print $_->trimmed_text (), "\n" for $root->children ('para');