HTML::RewriteAttributes::Links − concise link rewriting
# 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;
});
"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.
You don’t need to call "new" explicitly − it’s done in "rewrite". It takes no arguments.
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.
HTML::RewriteAttributes, HTML::Parser, HTML::ResolveLink, HTML::LinkExtor
Shawn M Moore, "<[email protected]>"
Copyright 2008−2010 Best Practical Solutions, LLC. HTML::RewriteAttributes::Links is distributed under the same terms as Perl itself.