comment on

I thought about adding the following

=head2 SNIPPET

You've just gotten a link with C<_TEXT> but you don't want the HTML
crap that comes with the text.  While C<HTML::LinkExtractor> won't get
rid of it for you, it's easier than easy with C<HTML::TokeParser::Simp
+le>

    use HTML::TokeParser::Simple;

    my $Link = { '_TEXT' => '<a href="http://perl.com/"> I am a LINK!!
+! </a>'};

    warn StripHTML( \$Link->{_TEXT} );
    warn StripHTML( \'<q>Turn on your love light BABY!</q>' );

    sub StripHTML {
        my $HtmlRef = shift;
        my $tp = new HTML::TokeParser::Simple( $HtmlRef );
        my $t = $tp->get_token(); # MUST BE A START TAG (@TAGS_IN_NEED
+)
                                  # otherwise it ain't come from LinkE
+xtractor
        if($t->is_start_tag) {
            return $tp->get_trimmed_text( '/'.$t->return_tag );
        } else {
           die " IMPOSSIBLE!!!! ";
        }
    }


=head1 AUTHOR
[download]

But then it hit me, why not just provide this as a package method?

Or provide an option to do this automatically?

Use get_text instead of get_trimmed_text (maybe make this an option as well)?

BTW ~ I'm gonna stick with HTML::TokeParser::Simple. Ovid doesn't need the publicy, but I like it. This'll be on CPAN before monday.

update: well, I made some changes and put it up on CPAN

____________________________________________________
** The Third rule of perl club is a statement of fact: pod is sexy.

In reply to (need feedback) Re: HTML::LinkExtractor by PodMaster
in thread HTML::LinkExtractor by PodMaster

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.


Come for the quick hacks, stay for the epiphanies.
	PerlMonks