in reply to Table::Extract unblessed reference
tables () is depricated and should be replaced by table_states ().
use warnings; use strict; use HTML::TableExtract; my $te = HTML::TableExtract->new (attribs => {align => 'center'}); my $data = join "", <DATA>; $te->parse ($data); foreach my $ts ($te->table_states ()) {print "R ", join (',', @$_), "\n" foreach $ts->rows ();}
__DATA__ <html> <body> <table align="center"> <tr><td>Name</td><td>Blah</td></tr> <tr><td>bill</td><td>fdagdfg</td></tr> <tr><td>ted</td><td>sdfsdf</td></tr> </table> </body> </html> R Name,Blah R bill,fdagdfg R ted,sdfsdf
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Table::Extract unblessed reference
by mojotoad (Monsignor) on Aug 01, 2005 at 06:49 UTC | |
by GrandFather (Saint) on Aug 01, 2005 at 07:12 UTC | |
by mojotoad (Monsignor) on Aug 01, 2005 at 07:38 UTC |