Thanks for the advice thus far. I applied Devel::Trace and Devel::TraceMethods. It seems that the parse method inherited from HTML::Parser is simply doing nothing -- none of the handlers are being called. Here is the relevant section Trace output. Text::Styler::Parser is a subclass of HTML::Parser. It's meant to text form HTML.
>> test.pl:3: $Devel::Trace::TRACE=0; >> test.pl:26: print $styler->text_style($html); >> Text/Styler.pm:21: my($self,$text) = @_; >> Text/Styler.pm:23: my $styler = new Text::Styler::Parser; >> Text/Styler/Parser.pm:21: my $proto = shift; >> Text/Styler/Parser.pm:22: my $class = ref( $proto ) || $proto; >> Text/Styler/Parser.pm:23: my $parser = HTML::Parser->new( api_ve +rsion => 3 ); >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:23: my $clas +s = shift; >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:24: my $self + = bless {}, $class; >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:25: return $ +self->init(@_); >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:31: my $self + = shift; >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:32: $self->_ +alloc_pstate; >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:34: my %arg += @_; >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:35: my $api_ +version = delete $arg{api_version} || (@_ ? 3 : 2); >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:36: if ($api +_version >= 4) { >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:42: if ($api +_version < 3) { >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:65: if (my $ +h = delete $arg{handlers}) { >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:73: while (m +y($option, $val) = each %arg) { >> /usr/local/lib/site_perl/i386-linux/HTML/Parser.pm:86: return $ +self; >> Text/Styler/Parser.pm:25: $parser->handler(start => \&start_hand +ler, 'self, tagname, attr' ); >> Text/Styler/Parser.pm:26: $parser->handler(end => \&end_handler, + 'self, tagname' ); >> Text/Styler/Parser.pm:27: $parser->handler(text => \&text_handle +r, 'self, dtext' ); >> Text/Styler/Parser.pm:28: $parser->report_tags( @report_tags ); >> Text/Styler/Parser.pm:29: $parser->unbroken_text(1); >> Text/Styler/Parser.pm:31: return bless $parser, $class; >> Text/Styler.pm:24: $styler->parse($text); >> Text/Styler.pm:27: $self->text_wrap( $styler->contents );
TraceMethods reports something similar.
parseText::Styler::Parser=HASH(0x80f5f7c)<p>Little <q>help</q> and lov +e key the i to i'll tune get me help i i.</p> <p>Walk friends sad, you. <br />My by up the my little, a a, and my i, + with <a href="http://tima.mplode.com/">you high</a> you're. By from +when walk would what my help from my, by, when. Your up, be own with +would is me up your you're friends does to of by and my how ears. You + if little with out i own, worry you, of are, little, not get, i sing + sad key. Stand help get with get be what are walk my out a of song, +on by would i a a. Away think think, because me not . Tune you with m +e a sing the how i'll song sang sang on your, out, i. Little, help he +lp and love key the i to i'll tune get me help i i, of. The <b>sad, you does by</b> up the my little, a.</p> <pre>xxxx foo foo</pre> at Text/Styler.pm line 24
Here is that same section when run on my Mac.
parseText::Styler::Parser=HASH(0xc63d4)<p>Little <q>help</q> and love +key the i to i'll tune get me help i i.</p> <p>Walk friends sad, you. <br />My by up the my little, a a, and my i, + with <a href="http://tima.mplode.com/">you high</a> you're. By from +when walk would what my help from my, by, when. Your up, be own with +would is me up your you're friends does to of by and my how ears. You + if little with out i own, worry you, of are, little, not get, i sing + sad key. Stand help get with get be what are walk my out a of song, +on by would i a a. Away think think, because me not . Tune you with m +e a sing the how i'll song sang sang on your, out, i. Little, help he +lp and love key the i to i'll tune get me help i i, of. The <b>sad, you does by</b> up the my little, a.</p> <pre>xxxx foo foo</pre> at Text/Styler.pm line 24 start_document_handlerText::Styler::Parser=HASH(0xc63d4) at Text/Style +r.pm line 24 start_handlerText::Styler::Parser=HASH(0xc63d4)pHASH(0xc72e4) at Text/ +Styler.pm line 24 text_handlerText::Styler::Parser=HASH(0xc63d4)Little at Text/Styler.p +m line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 start_handlerText::Styler::Parser=HASH(0xc63d4)qHASH(0xc7350) at Text/ +Styler.pm line 24 text_handlerText::Styler::Parser=HASH(0xc63d4)help at Text/Styler.pm l +ine 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 end_handlerText::Styler::Parser=HASH(0xc63d4)q at Text/Styler.pm line +24 text_handlerText::Styler::Parser=HASH(0xc63d4) and love key the i to i +'ll tune get me help i i. at Text/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 end_handlerText::Styler::Parser=HASH(0xc63d4)p at Text/Styler.pm line +24 text_handlerText::Styler::Parser=HASH(0xc63d4) at Text/Styler.pm line 24 start_handlerText::Styler::Parser=HASH(0xc63d4)pHASH(0xc7338) at Text/ +Styler.pm line 24 text_handlerText::Styler::Parser=HASH(0xc63d4)Walk friends sad, you. +at Text/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 start_handlerText::Styler::Parser=HASH(0xc63d4)brHASH(0xc7314) at Text +/Styler.pm line 24 text_handlerText::Styler::Parser=HASH(0xc63d4)My by up the my little, +a a, and my i, with at Text/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 start_handlerText::Styler::Parser=HASH(0xc63d4)aHASH(0xc738c) at Text/ +Styler.pm line 24 text_handlerText::Styler::Parser=HASH(0xc63d4)you high at Text/Styler. +pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 end_handlerText::Styler::Parser=HASH(0xc63d4)a at Text/Styler.pm line +24 text_handlerText::Styler::Parser=HASH(0xc63d4) you're. By from when wa +lk would what my help from my, by, when. Your up, be own with would i +s me up your you're friends does to of by and my how ears. You if lit +tle with out i own, worry you, of are, little, not get, i sing sad ke +y. Stand help get with get be what are walk my out a of song, on by w +ould i a a. Away think think, because me not . Tune you with me a sin +g the how i'll song sang sang on your, out, i. Little, help help and +love key the i to i'll tune get me help i i, of. The at Text/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 start_handlerText::Styler::Parser=HASH(0xc63d4)bHASH(0xc7398) at Text/ +Styler.pm line 24 text_handlerText::Styler::Parser=HASH(0xc63d4)sad, you does by at Text +/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 end_handlerText::Styler::Parser=HASH(0xc63d4)b at Text/Styler.pm line +24 text_handlerText::Styler::Parser=HASH(0xc63d4) up the my little, a. at + Text/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 end_handlerText::Styler::Parser=HASH(0xc63d4)p at Text/Styler.pm line +24 text_handlerText::Styler::Parser=HASH(0xc63d4) at Text/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 start_handlerText::Styler::Parser=HASH(0xc63d4)preHASH(0xc735c) at Tex +t/Styler.pm line 24 text_handlerText::Styler::Parser=HASH(0xc63d4)xxxx foo foo at Text/Styler.pm line 24 current_elementText::Styler::Parser=HASH(0xc63d4) at Text/Styler/Parse +r.pm line 71 end_handlerText::Styler::Parser=HASH(0xc63d4)pre at Text/Styler.pm lin +e 24
As I mentioned, what I find odd is that there is not an error message in sight. The box in which this is failing has been running the same version of Perl (5.6.1) for quite some time. I've written other HTML::Parser modules before on this box and not had an issue. Before I request to have this module updated on the system -- any additional thoughts are appreciated. Thanks for wisdom thus far.
In reply to Re: Re: HTML::Parser - no contents. no error.
by Anonymous Monk
in thread HTML::Parser - no contents. no error.
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |