Discussion :

[stansoad0108]

Bonjour à tous,

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

Code :

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

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 :

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

<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 :

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

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

[iblis]

Ben, rajoute juste la condition dans ton test

Code :

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

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

[stansoad0108]

Merci pour cette rapide réponse,

malheureusement rien se n'affiche dans la console !!

Code :

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

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

[iblis]

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

[iblis]

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 :

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

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)