#sample code
 ...
    foreach my $acc ($xml->findnodes('/account')) { 
      
        push @account, $acc->find('numbers');
        push @names,   $acc->find('names');
      
     }

    my $c=-1;
    foreach (@acount) {

      print "Account: <b>$_</b> - Name: $names[$c]";
     
     }
...