Discussion :

[etplus]

Bonjour,
J'ai d'un probleme de affichier content de noeud de xml

C'est le resultat de recherche de google desktop en format xml

Code xml :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
<results count="24945">
<result>
  <category>web</category> 
  <!-- ... optional internal, implementation-specific elements such as ids and flags... --> 
  <title>Developer Knowledge Base - Read the Google Desktop blog</title> 
  <url>http://code.google.com/support/bin/answer.py?answer=66869&topic=10434</url> 
  <time>128243290079530000</time> 
  <snippet>Desktop engineers regularly post development articles and announce updates to the &lt;b&gt;SDK&lt;/b&gt; and documentation. Here are some interesting posts from the past: New</snippet> 
  <thumbnail>/thumbnail?id=6%5Fvwps3QA4FIYGAAAA&s=wgQCmjGl0VEzw3KVhm3mxBG_x48</thumbnail> 
  <icon>/icon?id=http%3A%2F%2Fcode%2Egoogle%2Ecom%2F&s=kKR1by-QXDMlb5vEhxkDZhCv3eE</icon> 
  <cache_url>http://127.0.0.1:4664/...</cache_url> 
</result>
 
...
 
</results>

Je veux affichier le resultat de <results count="24945"> et le content entre <title> ....</title>

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
#ici le $doc est resultat de recherche de google desktop en format xml
my $doc = get "$newQuery"; 
my $queryReturn = XMLin($doc);
print "$mot: $queryReturn->{count}\n";

cet partie de code peut affichier le resultat de count

mais pour affichier le resultat de title
j'ai utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
#print "	title".$queryReturn->{results->{result}->{title}->{content}}."\n";

ca ne marche pas.
comment je doit faire pour affichier le content entre <title>...</title>?

[etplus]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
while ($doc =~ s/<title>([^<]+\.xml)//) {
	print "$1\n";
}

ce n'est pas la meilleur solution je pense

[JakoJako]

Utiliser une regex n'est pas à mon sens la meilleure solution, même si ça peut dépanner.

En utilisant XML::Simple - ce qui est quand même un peu plus propre... - tu peux récupérer dans la tableau @taResults les résultats, qu'il ne reste plus qu'à afficher, par exemple de la façon suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
my @taResults = @{$queryReturn->{'result'}};
my $iNbResults = scalar(@taResults);
 
for (my $iNoResult = 0; $iNoResult < $iNbResults; $iNoResult++)
{
    print $taResults[$iNoResult]->{'title'}[0] . "\n";
}

Attention, il y a un gros piège s'il n'y a qu'une seule réponse : dans ce cas, XMLIn par défaut ne fait pas un tableau. Il faut l'y contraindre en utilisant l'option ForceArray :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
my $queryReturn = eval { XMLin($doc, (ForceArray => 1, SuppressEmpty => 0))} ;

Au passage, par habitude, j'ai aussi mis SuppressEmpty à 0, je ne sais plus trop ce que ça fait, cf. la doc de XML::Simple.

Pour voir facilement la tête de tes données, tu peux utiliser le module Data:umper :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
use Data::Dumper;
...
print Dumper($queryReturn);

Jako