SYNOPSIS

# up for some HTML::ResolveLink?
$html = HTML::RewriteAttributes::Links->rewrite($html, "http://search.cpan.org");
# or perhaps HTML::LinkExtor?
HTML::RewriteAttributes::Links->rewrite($html, sub {
my ($tag, $attr, $value) = @_;
push @links, $value;
$value;
});

DESCRIPTION

"HTML::RewriteAttributes::Links" is a special case of HTML::RewriteAttributes for rewriting links.

See HTML::ResolveLink and HTML::LinkExtor for examples of what you can do with this.

METHODS

new

You don't need to call "new" explicitly - it's done in ``rewrite''. It takes no arguments.

rewrite HTML, (callback|base)[, args] -> HTML

See the documentation of HTML::RewriteAttributes.

Instead of a callback, you may pass a string. This will mimic the behavior of HTML::ResolveLink --- relative links will be rewritten using the given string as a base URL.

AUTHOR

Shawn M Moore, "<[email protected]>"

LICENSE

Copyright 2008-2010 Best Practical Solutions, LLC. HTML::RewriteAttributes::Links is distributed under the same terms as Perl itself.