Select Code to Download

use warnings;
use strict;
...
  "Karim Afdel",
  "Gwenaelle Catheline",
)

my @array;
foreach my $authors ($doc->findnodes('/result/hits/hit/info')) {
...
        $authors->findnodes('./authors/author');
}
# use @array here