Perl

Récupération de données dans un fichier HTML Acte III

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Récupération de données dans un fichier HTML Acte III

thales69

Bonjour,

je reviens vers vous car j'ai un petit souci de récup de données. Je voudrais récupérer les données en gras dans le fichier HTML à la fin du message(qui provient de l'URL: http://www.betexplorer.com/soccer/ [...] /fixtures/ ) , mais j'aimerais que le résultat dans le fichier texte "cal_ligue1_2013_temp.txt" soit sous la forme:

3. Round
26.08.2012 21:00 Paris SG - Bordeaux

4. Round
01.09.2012 17:00 Lyon - Valenciennes
01.09.2012 20:00 Ajaccio - Evian TG
01.09.2012 20:00 Bastia - St Etienne
01.09.2012 20:00 Brest - Troyes
01.09.2012 20:00 Lorient - Nancy
01.09.2012 20:00 Sochaux - Montpellier
01.09.2012 20:00 Toulouse - Reims
02.09.2012 14:00 Bordeaux - Nice
02.09.2012 17:00 Marseille - Rennes
02.09.2012 21:00 Lille - Paris SG

5. Round
15.09.2012 19:00 Evian TG - Bastia
15.09.2012 19:00 Lyon - Ajaccio
15.09.2012 19:00 Nancy - Marseille
15.09.2012 19:00 Nice - Brest
15.09.2012 19:00 Paris SG - Toulouse
15.09.2012 19:00 Reims - Montpellier
15.09.2012 19:00 Rennes - Lorient
15.09.2012 19:00 St Etienne - Sochaux
15.09.2012 19:00 Troyes - Lille
15.09.2012 19:00 Valenciennes - Bordeaux

6. Round
......

or pour l'instant j'arrive à récupérer cela:

3. Round

26.08.2012 21:00 Paris SG - Bordeaux
4. Round

01.09.2012 17:00 Lyon - Valenciennes
01.09.2012 20:00 Ajaccio - Evian TG
† Bastia - St Etienne
† Brest - Troyes
† Lorient - Nancy
† Sochaux - Montpellier
† Toulouse - Reims
02.09.2012 14:00 Bordeaux - Nice
02.09.2012 17:00 Marseille - Rennes
02.09.2012 21:00 Lille - Paris SG
5. Round

15.09.2012 19:00 Evian TG - Bastia
† Lyon - Ajaccio
† Nancy - Marseille
† Nice - Brest
† Paris SG - Toulouse
† Reims - Montpellier
† Rennes - Lorient
† St Etienne - Sochaux
† Troyes - Lille
† Valenciennes - Bordeaux
6. Round
....

Le problème est que le fichier HTML n'est pas symétrique et je ne peux pas récupérer les dates correspondantes aux matchs qui se jouent le même jour et à a même heure(à part le premier match) car elles ne figurent pas dans la balise <td class="first-cell date tl">, il y a un   . J'essaie depuis un petit moment mais je ne sais pas ce qui est le mieux, faut-il modifier mon script calfrance_2013.pl ou alors retravailler le fichier obtenu avec les espèces de petites croix ? Là je suis complètement perdu, j'ai essayer une sorte de boucle sur le fichier obtenu avec une regex pour essayer de remplacer les   par la date qui est sur la ligne précédente mais sans succès !! D'ailleurs je sais pas si c'est possible de récupérer une variable sur une ligne précédente avec les regex et une boucle .... enfin avec PERL ça doit être possible .
Merci à vous pour un petit coup de main.

Voici mon fichier calfrance_2013.pl:

Code :

#!C:/Perl/bin/perl.exe -w
use strict; use warnings;
use HTML::TreeBuilder;
use LWP::Simple;
######################################
# #
# Récupération du calendrier des 3 championnats Français #
# Ligue1 - Ligue2 - National #
# dans les fichiers cal_ligue1_2013.txt ; #
# cal_ligue2_2013.txt et cal_national_2013.txt #
# #
#######################################
open(A,">cal_ligue1_2013_temp.txt" );
my $url1 = 'http://www.betexplorer.com/soccer/france/ligue-1/fixtures/';
my $tree = HTML::TreeBuilder->new_from_content(get($url1));
my ($td, $th, $a, $att, @infos, @content); #les variables utiles
my @tr = $tree->find('tr');
foreach (@tr) {
@infos = ();
@content = ();
my $att = $_->attr("class" );
if ($att and $att =~ /rtitle/) { #si tr avec attribut class avec rtitle, on y cherche un th
$th = $_->look_down("_tag", "th", "class", "left first-cell nobr" );
next unless ($th);
@content = $th->content_list();
print A $content[0], "\n";
}
else { #sinon on est dans le cas <td> sous <tr>
$td = $_->look_down("_tag", "td", "class", "first-cell date tl" );
next unless ($td);
@content = $td->content_list();
push @infos, $content[0];
$td = $td->right;
$a = $td->find('a');
next unless ($a);
@content = $a->content_list();
push @infos, $content[0];
}
print A "@infos\n";
}
close A;

Fichier HTML:

Spoiler :

<tr class="rtitle first-row">
<th class="left first-cell nobr" colspan="2">3. Round</th>
<th class="tv"> </th>
<th class="bs">B's</th>
<th>1</th>
<th>X</th>
<th class="last-cell nobr">2</th>
</tr>
<tr class="match-line first-row">
<td class="first-cell date tl">26.08.2012 21:00</td>
<td class="tl nobr"><a href="../nextmatch.php?matchid=1335840">Paris SG - Bordeaux</a></th>
<td class="tv"><img src="/res/img/icon-tv.gif" onmouseover="showStreams(1335840);" onmouseout="hideStreams(1335840);"/><div class="streams" id="streams1335840" onmouseover="showStreams(1335840);" onmouseout="hideStreams(1335840);"><div class="head">Live streams</div><div class="body"><a href="/bookmaker/11/http://www.bet365.com?affiliate=365_021894" target="_blank">bet365</a> </div></div></td>
<td class="bs">44</td>
<td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335840&outcomeid=46281338&otheroutcomes=46281337,46281339" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.60</a></td>
<td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335840&outcomeid=46281337&otheroutcomes=46281338,46281339" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.60</a></td>
<td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335840&outcomeid=46281339&otheroutcomes=46281338,46281337" title="Add to My Selections" target="mySelections" class="mySelectionsTip">6.10</a></td>
</tr>
<tr class="rtitle">
<th class="left first-cell nobr" colspan="2">4. Round</th>
<th class="tv"> </th>
<th class="bs">B's</th>
<th>1</th>
<th>X</th>
<th class="last-cell nobr">2</th>
</tr>
<tr class="match-line first-row">
<td class="first-cell date tl">01.09.2012 17:00</td>
<td class="tl nobr"><a href="../nextmatch.php?matchid=1335849">Lyon - Valenciennes</a></th>
<td class="tv"> </td>
<td class="bs">3</td>
<td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335849&outcomeid=48941506&otheroutcomes=48941505,48941507" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.44</a></td>
<td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335849&outcomeid=48941505&otheroutcomes=48941506,48941507" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.80</a></td>
<td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335849&outcomeid=48941507&otheroutcomes=48941506,48941505" title="Add to My Selections" target="mySelections" class="mySelectionsTip">8.08</a></td>
</tr>
<tr class="match-line strong">
<td class="first-cell date tl">01.09.2012 20:00</td>
<td class="tl nobr"><a href="../nextmatch.php?matchid=1335844">Ajaccio - Evian TG</a></th>
<td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335844&outcomeid=48941517&otheroutcomes=48941516,48941518" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.42</a></td>
<td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335844&outcomeid=48941516&otheroutcomes=48941517,48941518" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.07</a></td>
<td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335844&outcomeid=48941518&otheroutcomes=48941517,48941516" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.95</a></td>
</tr>
<tr class="match-line">
<td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335850">Bastia - St Etienne</a></th><td class="tv"> </td>
<td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335850&outcomeid=48941501&otheroutcomes=48941498,48941502" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.42</a></td>
<td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335850&outcomeid=48941498&otheroutcomes=48941501,48941502" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.07</a></td>
<td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335850&outcomeid=48941502&otheroutcomes=48941501,48941498" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.95</a></td>
</tr>
<tr class="match-line strong"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335851">Brest - Troyes</a></th><td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335851&outcomeid=48941528&otheroutcomes=48941527,48941529" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.95</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335851&outcomeid=48941527&otheroutcomes=48941528,48941529" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.13</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335851&outcomeid=48941529&otheroutcomes=48941528,48941527" title="Add to My Selections" target="mySelections" class="mySelectionsTip">4.02</a></td></tr>
<tr class="match-line"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335845">Lorient - Nancy</a></th><td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335845&outcomeid=48941533&otheroutcomes=48941532,48941534" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.08</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335845&outcomeid=48941532&otheroutcomes=48941533,48941534" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.03</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335845&outcomeid=48941534&otheroutcomes=48941533,48941532" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.67</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335846">Sochaux - Montpellier</a></th><td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335846&outcomeid=48941538&otheroutcomes=48941537,48941539" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.07</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335846&outcomeid=48941537&otheroutcomes=48941538,48941539" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.03</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335846&outcomeid=48941539&otheroutcomes=48941538,48941537" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.35</a></td></tr>
<tr class="match-line"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335852">Toulouse - Reims</a></th><td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335852&outcomeid=48941543&otheroutcomes=48941542,48941544" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.71</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335852&outcomeid=48941542&otheroutcomes=48941543,48941544" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.33</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335852&outcomeid=48941544&otheroutcomes=48941543,48941542" title="Add to My Selections" target="mySelections" class="mySelectionsTip">5.10</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl">02.09.2012 14:00</td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335847">Bordeaux - Nice</a></th><td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335847&outcomeid=48941548&otheroutcomes=48941547,48941550" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.73</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335847&outcomeid=48941547&otheroutcomes=48941548,48941550" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.32</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335847&outcomeid=48941550&otheroutcomes=48941548,48941547" title="Add to My Selections" target="mySelections" class="mySelectionsTip">5.00</a></td></tr>
<tr class="match-line"><td class="first-cell date tl">02.09.2012 17:00</td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335848">Marseille - Rennes</a></th><td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335848&outcomeid=48941556&otheroutcomes=48941555,48941557" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.07</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335848&outcomeid=48941555&otheroutcomes=48941556,48941557" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.10</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335848&outcomeid=48941557&otheroutcomes=48941556,48941555" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.62</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl">02.09.2012 21:00</td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335853">Lille - Paris SG</a></th><td class="tv"> </td><td class="bs">3</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335853&outcomeid=48941591&otheroutcomes=48941590,48941592" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.58</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335853&outcomeid=48941590&otheroutcomes=48941591,48941592" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.07</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335853&outcomeid=48941592&otheroutcomes=48941591,48941590" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.74</a></td></tr>
<tr class="rtitle"><th class="left first-cell nobr" colspan="2">5. Round</th><th class="tv"> </th><th class="bs">B's</th><th>1</th><th>X</th><th class="last-cell nobr">2</th></tr>
<tr class="match-line first-row"><td class="first-cell date tl">15.09.2012 19:00</td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335857">Evian TG - Bastia</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335857&outcomeid=48941599&otheroutcomes=48941598,48941600" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.00</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335857&outcomeid=48941598&otheroutcomes=48941599,48941600" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.20</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335857&outcomeid=48941600&otheroutcomes=48941599,48941598" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.90</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335859">Lyon - Ajaccio</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335859&outcomeid=48941604&otheroutcomes=48941603,48941606" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.35</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335859&outcomeid=48941603&otheroutcomes=48941604,48941606" title="Add to My Selections" target="mySelections" class="mySelectionsTip">4.25</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335859&outcomeid=48941606&otheroutcomes=48941604,48941603" title="Add to My Selections" target="mySelections" class="mySelectionsTip">10.50</a></td></tr>
<tr class="match-line"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335854">Nancy - Marseille</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335854&outcomeid=48941615&otheroutcomes=48941614,48941616" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.90</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335854&outcomeid=48941614&otheroutcomes=48941615,48941616" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.15</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335854&outcomeid=48941616&otheroutcomes=48941615,48941614" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.45</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335858">Nice - Brest</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335858&outcomeid=48941623&otheroutcomes=48941622,48941624" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.15</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335858&outcomeid=48941622&otheroutcomes=48941623,48941624" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.10</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335858&outcomeid=48941624&otheroutcomes=48941623,48941622" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.55</a></td></tr>
<tr class="match-line"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335860">Paris SG - Toulouse</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335860&outcomeid=48941633&otheroutcomes=48941630,48941635" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.40</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335860&outcomeid=48941630&otheroutcomes=48941633,48941635" title="Add to My Selections" target="mySelections" class="mySelectionsTip">4.00</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335860&outcomeid=48941635&otheroutcomes=48941633,48941630" title="Add to My Selections" target="mySelections" class="mySelectionsTip">9.50</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335861">Reims - Montpellier</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335861&outcomeid=48941642&otheroutcomes=48941641,48941643" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.15</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335861&outcomeid=48941641&otheroutcomes=48941642,48941643" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.10</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335861&outcomeid=48941643&otheroutcomes=48941642,48941641" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.30</a></td></tr>
<tr class="match-line"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335862">Rennes - Lorient</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335862&outcomeid=48941650&otheroutcomes=48941649,48941651" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.85</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335862&outcomeid=48941649&otheroutcomes=48941650,48941651" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.40</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335862&outcomeid=48941651&otheroutcomes=48941650,48941649" title="Add to My Selections" target="mySelections" class="mySelectionsTip">4.25</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335855">St Etienne - Sochaux</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335855&outcomeid=48941655&otheroutcomes=48941654,48941656" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.80</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335855&outcomeid=48941654&otheroutcomes=48941655,48941656" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.45</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335855&outcomeid=48941656&otheroutcomes=48941655,48941654" title="Add to My Selections" target="mySelections" class="mySelectionsTip">4.40</a></td></tr>
<tr class="match-line"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335856">Troyes - Lille</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335856&outcomeid=48941660&otheroutcomes=48941659,48941661" title="Add to My Selections" target="mySelections" class="mySelectionsTip">4.10</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335856&outcomeid=48941659&otheroutcomes=48941660,48941661" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.30</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335856&outcomeid=48941661&otheroutcomes=48941660,48941659" title="Add to My Selections" target="mySelections" class="mySelectionsTip">1.90</a></td></tr>
<tr class="match-line strong"><td class="first-cell date tl"> </td><td class="tl nobr"><a href="../nextmatch.php?matchid=1335863">Valenciennes - Bordeaux</a></th><td class="tv"> </td><td class="bs">1</td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335863&outcomeid=48941665&otheroutcomes=48941664,48941666" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.70</a></td><td class="odds"><a href="/my_selections.php?sportid=1&action=3&matchid=1335863&outcomeid=48941664&otheroutcomes=48941665,48941666" title="Add to My Selections" target="mySelections" class="mySelectionsTip">3.15</a></td><td class="odds nobr last-cell"><a href="/my_selections.php?sportid=1&action=3&matchid=1335863&outcomeid=48941666&otheroutcomes=48941665,48941664" title="Add to My Selections" target="mySelections" class="mySelectionsTip">2.60</a></td></tr>
<tr class="rtitle"><th class="left first-cell nobr" colspan="2">6. Round</th><th class="tv"> </th><th class="bs">B's</th><th>1</th><th>X</th><th class="last-cell nobr">2</th></tr>

Message édité par thales69 le 26-08-2012 à 22:46:26

Publicité

gilou

Modérateur
Modzilla

:hello:
J'étais pris cette semaine, je viens d'y jeter un oeil.
Ceci devrait faire l'affaire:

Code :

#!C:/Perl/bin/perl.exe
use strict; 
use warnings;
use HTML::TreeBuilder;
################################################################
#                                                             #
#  Récupération du calendrier des 3 championnats Français      #
#    Ligue1 - Ligue2 - National                             #
#  dans les fichiers  cal_ligue1_2013.txt ;                    #
#  cal_ligue2_2013.txt et cal_national_2013.txt                   #
#                                                           #
################################################################
open(A,">cal_ligue1_2013_temp.txt" );
 
my $url1 = 'http://www.betexplorer.com/soccer/france/ligue-1/fixtures/';
my $tree = HTML::TreeBuilder->new_from_url($url1);
my ($td, $th, $a, $att, @infos, @content, $schedule);  #les variables utiles
my @tr = $tree->find('tr');
foreach (@tr) {
  @infos = ();
  @content = ();
  my $att = $_->attr("class" );
  if ($att and $att =~ /rtitle/) { #si tr avec attribut class avec rtitle, on y cherche un th
    $th = $_->look_down("_tag", "th", "class", "left first-cell nobr" );
    next unless ($th);
    @content = $th->content_list();
    print A "\n$content[0]";
  }
  else {  #sinon on est dans le cas <td> sous <tr>
    $td = $_->look_down("_tag", "td", "class", "first-cell date tl" );
    next unless ($td);
    @content = $td->content_list();
    if ($content[0] =~ /\d/) {
      $schedule = $content[0];
    }
    push @infos, $schedule;
    $td = $td->right;
    $a = $td->find('a');
    next unless ($a);
    @content = $a->content_list();
    push @infos, $content[0];
    }
    print A "@infos\n";
  }
 
close A;

my $tree = HTML::TreeBuilder->new_from_url($url1);
c'est plus simple et ça évite de faire un appel explicite à LWP::Simple
my ($td, $th, $a, $att, @infos, @content, $schedule); #les variables utiles
Je rajoute $schedule pour y placer la dernière date valide trouvée
print A "\n$content[0]";
ça va éviter de séparer la ligne Round de la ligne qui suit par une ligne vide et ça mettra une ligne vide avant chaque nouveau Round
if ($content[0] =~ /\d/) {
$schedule = $content[0];
}
Si on trouve une nouvelle date valide (On teste juste si le champ contient un chiffre) on la met dans $schedule (sinon, on garde la dernière date valide trouvée)
push @infos, $schedule;
Et c'est cette date valide courante qu'on stocke.
C'est tout.

En sortie j'ai:

4. Round
01.09.2012 17:00 Lyon - Valenciennes
01.09.2012 20:00 Ajaccio - Evian TG
01.09.2012 20:00 Bastia - St Etienne
01.09.2012 20:00 Brest - Troyes
01.09.2012 20:00 Lorient - Nancy
01.09.2012 20:00 Sochaux - Montpellier
01.09.2012 20:00 Toulouse - Reims
02.09.2012 14:00 Bordeaux - Nice
02.09.2012 17:00 Marseille - Rennes
02.09.2012 21:00 Lille - Paris SG

5. Round
15.09.2012 19:00 Evian TG - Bastia
15.09.2012 19:00 Lyon - Ajaccio
15.09.2012 19:00 Nancy - Marseille
15.09.2012 19:00 Nice - Brest
15.09.2012 19:00 Paris SG - Toulouse
15.09.2012 19:00 Reims - Montpellier
15.09.2012 19:00 Rennes - Lorient
15.09.2012 19:00 St Etienne - Sochaux
15.09.2012 19:00 Troyes - Lille
15.09.2012 19:00 Valenciennes - Bordeaux
.....................

A+,

Message édité par gilou le 31-08-2012 à 14:17:32

---------------
There's more than what can be linked! -- Iyashikei Anime Forever! -- AngularJS c'est un framework d'engulé! --

thales69

Juste trop fort Gilou !!! ça marche impec.

Merci beaucoup à toi ... pour la leçon, j'en apprends des tonnes chaque fois que tu postes

A+

Message édité par thales69 le 31-08-2012 à 15:12:42

FORUM HardWare.fr

Programmation

Perl

Récupération de données dans un fichier HTML Acte III

Sujets relatifs
Ajouter informations Base de données	Fichier .bat avec IF successifs [Résolu]
[MySQL Linux] Bases de données sur différentes partitions?	probléme page html qui fonctionne sur pc mais pas sur site
Inclure du PHP dans un mail en html	Télécharger images dont liens contenu dans fichier txt ou autre
garder des données en mémoire dans une liste déroulante	Copier collet fichier les plus recents ?
Résolution html/css	Fenêtre fichier exécutable Fotran
Plus de sujets relatifs à : Récupération de données dans un fichier HTML Acte III

Page générée en 0.119 secondes