[HTML::Parser] Problème Attributs dans une balise

Bonjour à tous,

J' ai souhaité parser un page html à l'aide du module HTML :: Parser...TOUT FONCTIONNE !!

Code:

---

1 2 3

my $parser = HTML::Parser->new(start_h => [\&start_rtn,"tag, attr"], text_h => [\&text_rtn, "text"], end_h => [\&end_rtn, "tag"]);

---

Cependant, je rencontre des balises du style :

Code:

---

<a href="/redirect.jsp?p=http%3A%2F%2Fgenome" target="offsite">chr19:11058965</a>

---

On y trouve 2 attributs (attr) :
href
target
Je ne connais pas la synthaxe pour parser 2 attributs dans une balise. Je ne sais le faire ou il y a qu'un seul attribut (href par exemple)

Exemple :

Code:

---

1 2 3

if ($tag =~ /^a$/ and defined $attr->{href} and $attr->{href} =~ /^\/views\/reports\/loadVariantReport.action?/){ $flag = 3; }

---

Pouvez vous m'aider (Récupérer le texte entre 2 balises, ou je trouve 2 attributs (href et target))
Merci

Ben, rajoute juste la condition dans ton test ;)

Code:

---

1 2	... and defined $attr->{target} and $attr->{target} =~ /^offsite$/

---

Merci pour cette rapide réponse,

malheureusement rien se n'affiche dans la console !!

Code:

---

1 2 3 4

if ($tag =~ /^a$/ and (defined $attr->{href} and $attr->{href} =~ /^\/redirect.jsp?p=http%3A%2F%2Fgenome.ucsc.edu%2Fcgi-bin%2FhgTracks 3Fposition%3Dchr19%3A11058915-11059015$/) and (defined $attr->{target} and $attr->{target} =~ /^offsite$/)){ $flag = 3; }

---

Si vous aviez d'autres solutions MERCI

Alors c'est que le problème est ailleurs dans ton code (ou dans le html).

Si tu veux détecter la balise de l'exemple que tu donnes plus haut (mais encore une fois je ne sais pas ce que fais le reste de ton code, ni ce qu'il y a chercher et à trouver dans ton html), tu devrais avoir quelque chose du genre :

Code:

---

1 2 3 4 5 6 7 8

if ($tag =~ /^a$/ and defined $attr->{href} and $attr->{href} =~ /^\/redirect\.jsp\?p=http%3A%2F%2Fgenome/ and defined $attr->{target} and $attr->{target} =~ /^offsite$/ ) { # ... }

---

Pense à échapper au moins tes ? (le . est moins grave)