IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Web Perl Discussion :

Question en rapport avec le module HTML::TokeParser


Sujet :

Web Perl

  1. #1
    Membre averti
    Inscrit en
    Juillet 2006
    Messages
    72
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 72
    Par défaut Question en rapport avec le module HTML::TokeParser
    Si dans un cas j'ai
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    <span>
       <a>tata</a>
       <a>tete</a>
       <a>titi</a>
       <a>toto</a>
    </span>
    et un autre cas
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    <span> 
         <a></a>
         <a></a>
         <a></a>
         <a></a>
    </span>
    Est-ce qu'il y a un moyen de poser une condition sur l'existence ou nom de texte entre les balises a?

  2. #2
    Membre averti
    Inscrit en
    Juillet 2006
    Messages
    72
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 72
    Par défaut
    En fait j'ai remarqué que pour:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    <span>
       <a>tata</a>
       <a>tete</a>
       <a>titi</a>
       <a>toto</a>
    </span>
    c'était en fait
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    <span>
       <a><span class=annee>tata</span></a>
       <a><span class=annee>tete</span></a>
       <a><span class=annee>titi</span></a>
       <a><span class=annee>toto</span></a>
    </span>
    Et pas ces span quand il n'y a pas le text entre les balises <a>.
    bon voilà ce que j'ai fait mais ça marche pas:
    Code : 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
    18
    19
    20
    21
    22
    23
    24
    25
    elsif ($type eq 'S' and $tok_arbre->[1] eq 'a' and $in_span and $tok_arbre->[2] {target} eq "titre" and $tok_arbre->[2] {href}=~ m/^HTML/ )  {
                $in_a++;
                my $tok_span = $p_table->get_tag("span");
                if ($tok_span->[1] {class} eq "annee") {
                    $in_span_an ++
                }
     
                else {
                    $cpt_div_class++;
                    $text = qq(<div class="niv$cpt_div_class">
                    <a target="$cible" href="$url" > Tableau HTML</a>
                    <br>);
     
                }
                }
    [...]
     elsif($type eq 'T' and $in_span_an) {
                $text=$p_table->get_trimmed_text("/span");
                print $test_error "\n"."text: ".$text;
                $text= qq(<div class="niv$cpt_div_class">
                <a target="$cible" href="$url"  > $text</a>
                 <br>
                 </div>);
     
            }
    Ca rentre jamais dans $in_span_an.
    Je suis preneur de n'importe quelle idée.

Discussions similaires

  1. Question en rapport avec l'API Properties
    Par samsam786 dans le forum Collection et Stream
    Réponses: 5
    Dernier message: 25/03/2010, 14h34
  2. Réponses: 1
    Dernier message: 20/08/2007, 21h33
  3. [XHTML] XHTML: plusieur question par rapport au html
    Par pierrot10 dans le forum Balisage (X)HTML et validation W3C
    Réponses: 1
    Dernier message: 30/08/2006, 08h50

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo