Perl, come analizzare il file XML, xpath

Question

Voglio analizzare un file XML utilizzando Perl. Sono stato in grado di farlo utilizzando il modulo XML :: Simple, ma ora voglio iniziare a utilizzare il modulo XML :: XPath perché utilizza le espressioni XPath. Dalla mia conoscenza limitata penso che gli XPath renderanno l'analisi del futuro più facile, giusto? Ecco il codice Perl che ho finora:

use strict; 
use warnings; 
use XML::XPath; 

my $file = "data.xml"; 
my $path = XML::XPath->new(filename => $file); 

my $name = $path->find('/category/event/@name'); 
print $name."\n"; 

mia domanda è come faccio a separare ciascun attributo name (categoria/evento/@nome) in modo che possa effettuare test su ogni valore che di analisi. Al momento sto ottenendo solo una grande stringa piena di dati analizzati, mentre voglio parecchie piccole stringhe che posso testare. Come posso fare questo? Grazie :-)

Answer 1

This review ricorda che XML::XPath non è stato aggiornato dal 2003, e raccomanda XML::LibXML invece

use 5.010; 
use strict; 
use warnings; 
use XML::LibXML; 

my $dom = XML::LibXML->new->parse_file('data.xml'); 
for my $node ($dom->findnodes('/category/event/@name')) { 
    say $node->toString; 
} 

Vedi XML::LibXML::Parser e XML::LibXML::Node.

Answer 2

Il metodo restituisce un oggetto findXML::XPath::NodeSet che è una raccolta di tutti i nodi trovati . Non riesco a immaginare cosa si possa fare per vedere una lunga stringa con tutti i valori degli attributi.

Dopo aver recuperato il set di nodi, si lavora sui suoi contenuti con metodi come size, get_node e get_nodelist (vedere i documenti che ho collegato sopra). get_nodelist restituirà un elenco Perl di, in questo caso, gli oggetti XML::XPath::Node::Attribute che hanno anche i propri metodi. Questo programma dovrebbe iniziare

use strict; 
use warnings; 

use XML::XPath; 

my $xp = XML::XPath->new(ioref => \*DATA); 

my $names = $xp->find('/category/event/@name'); 

for my $node ($names->get_nodelist) { 
    say $node->getNodeValue; 
} 


__DATA__ 
    <category name="a"> 
    <event name="cat1" /> 
    <event name="cat2" /> 
    <event name="cat3" /> 
    <event name="cat4" /> 
    <event name="cat5" /> 
    </category> 

USCITA

cat1 
cat2 
cat3 
cat4 
cat5