Q: about ->extractlinks
Fred Kleindenst (fred@boxtop.com)
Thu, 29 Feb 96 16:03 PST
My question concerns the following code segment:
for (@{ $h->extractLinks( qw(a img body) ) }) {
($link, $linkelem) = @$_;
$bar = $linkelem->tag();
$link =~ tr/A-Z/a-z/;
if ( $bar eq a ) { $linkelem ->attr(href, $link); }
if ( $bar eq img ) { $linkelem ->attr(src, $link); }
if ( $bar eq body ) { $linkelem ->attr(background, $link);}
}
extractlinks won't return links inside of the body tag. Why is this? How can
I work around it?
TIA
-- Fred Kleindenst \
-- Systems Administrator \ fred@boxtop.com
-- Boxtop Interactive \