problem affichage avec HTML::TableExtract
bonsoir,
je veux utiliser le module HTML::TableExtract pour l'analyse des donnes contenu ds un tableau html.
j'utilise se code (pris de CPAN avec qq petit modification) pour fair des tests sur un fichier html en locale contenant plusieurs table.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
#!usr/bin/perl -w
use HTML::TableExtract;
$html_file="myfile.htm";
$te = new HTML::TableExtract( depth => 0 );
$te->parse($html_file);
#Examine all matching tables
foreach $ts ($te->table_states) {
print "Table (", join(',', $ts->coords), "):\n";
foreach $row ($ts->rows) {
print join(',', @$row), "\n";
}
} |
le programme s'execute sans aucune erreur, mais rien ne s'affiche.
je ne sais pas quel est le probleme.
merci pour votre aide.
