in reply to How to re-use HTML::TableExtract objects?

Is the $te object a hashref? Many of the html::Parser type objects seem to be. If so, I believe you could do something like 
$te->{depth} = $whatever;

[download]
and then manipulate that how you like. However, I confess to being an object newbie. If I'm wrong, or this idea just wasted your time, you can slap me with a fish ;)

Replies are listed 'Best First'.
Re^2: How to re-use HTML::TableExtract objects?
by holli (Abbot) on May 30, 2005 at 15:47 UTC
    The object is indeed a hashref, as the following snippet shows, and so your approach should work fine: 
    use strict;
use warnings;

use Data::Dumper;
use HTML::TableExtract;

my $te = HTML::TableExtract->new( depth => 2, count => 2 );

print Dumper ($te);

    [download]

    Output: 
    $VAR1 = bless( {
                 '_ts_sequential' => [],
                 'headers' => undef,
                 'br_translate' => 1,
                 'gridmap' => 1,
                 'strip_html_on_match' => 0,
                 'subtables' => undef,
                 'decode' => 1,
                 'keep_headers' => 0,
                 '_in_a_table' => 0,
                 'keep' => 0,
                 'debug' => 0,
                 '_tables' => {},
                 '_cdepth' => -1,
                 'elastic' => 1,

    [download]
                     'count' => 2,
                 'depth' => 2,

    [download]
                     'automap' => 1,
                 'keepall' => 0,
                 'error_handle' => \*::STDOUT,
                 'attribs' => undef,
                 'keep_html' => 0,
                 'chain' => undef,
                 '_hparser_xs_state' => \25467620,
                 'slice_columns' => 1,
                 '_counts' => {},
                 '_tablestack' => [],
                 '_table_mapback' => {}
               }, 'HTML::TableExtract' );

    [download]
    But I slap you anyway, just for fun :-)


    holli, /regexed monk/
[reply]
[d/l]
[select]
Re^2: How to re-use HTML::TableExtract objects?
by jpeg (Chaplain) on May 30, 2005 at 21:32 UTC
    Bueno bueno good good good!
    I wouldn't have thought of poking the objects that way. Cool. Thanks to both you and holli.

    *tosses you a fish*

    --
    jpg
[reply]

In Section Seekers of Perl Wisdom