'Ola, monks.

I've been having a terrible time using HTML::TableExtract to extract a column from an HTML file using the 'column($col)' subroutine. I'm entirely baffled by this, so I've decided to throw in the towel and let some real professionals take a stab at it.

No matter how I use 'column($cols)', I always get a 'row ARRAY(...) out of range (0)' message. I took a peak at the source for HTML::TableExtract, but couldn't determine what's going wrong. Could some benevolent monk show me the way?

Relevant links, for the lazy:
#!/usr/bin/perl 

use HTML::TableExtract; 
use WWW::Mechanize;
use Data::Dumper;

use strict; 
use warnings;

my $sensational = WWW::Mechanize->new( autocheck => 1 ); 
$sensational->get('http://www.drudgereport.com/');

chomp(my $html = $sensational->content); 

my $table = HTML::TableExtract->new(); 
$table->parse($html); 

#$table->tables_dump;

my $t = $table->first_table_found; 

#print $t->cell(0,1);        # works fine

# each of these generate a 'row ARRAY(...) out of range (0)' message
#print $t->column(1), "\n";  
#print for $t->column(1);    
#print Dumper $t->column(1);
$t->column(1);

[download]

In reply to HTML::TableExtract woes by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.