comment on

You have to know your tools. HTML::LinkExtor was designed to only extract the links, not the text in between (whatever you call it, cdata or whatever).

Demo

use strict;
use Data::Dumper;
use HTML::LinkExtor;

my $base = 'http://perlmonks.org/';
my $stringy = q{
 <tr><td><a HREF="/index.pl?node_id=188511">How does this code work (w
+arnings.pm)?</a></td> <td>by  <a HREF="/index.pl?node_id=80322">John 
+M. Dlugosz</a></td></tr>
 <tr><td><a HREF="/index.pl?node_id=188509">Tk and X events</a></td> <
+td>by  <a HREF="/index.pl?node_id=961">Anonymous Monk</a></td></tr>
 <tr><td><a HREF="/index.pl?node_id=188507">warnings::warnif etc. wise
+ usage?</a></td> <td>by  <a HREF="/index.pl?node_id=80322">John M. Dl
+ugosz</a></td></tr>
 <tr><td><a HREF="/index.pl?node_id=188505">52-bit numbers as floating
+ point</a></td> <td>by  <a HREF="/index.pl?node_id=80322">John M. Dlu
+gosz</a></td></tr>
};


my $p = new HTML::LinkExtor(undef, $base);

$p->parse($stringy);

print Dumper $p->links;

$p = new HTML::LinkExtor( sub { print Dumper($_) for @_; } , $base);

$p->parse($stringy);
[download]

And now for the nudge, HTML::TokeParser tutorial

update: suprise, suprise, I've solved this one before (crazyinsomniac) Re: Getting the Linking Text from a page

______crazyinsomniac_____________________________
Of all the things I've lost, I miss my mind the most.
perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"

In reply to Re: Using HTTP::LinkExtor to get URL and description info by crazyinsomniac
in thread Using HTTP::LinkExtor to get URL and description info by Popcorn Dave

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Perl-Sensitive Sunglasses
	PerlMonks