use XML::Twig;

# ...

my $twig = XML::Twig->new();
$twig->parsefile($XmlFile);

my @a_elements = $twig->get_xpath("//a");

foreach my $el (@a_elements)
{
  my $text = $el->text();
  # do stuff with $text.
}