| Subject: | endlessloop... |
I have this code:
my $parser = HTML::LinkExtractor->new();
$parser->parse(\$content_temp);
foreach my $link_hashref (@{ $parser->links }) {
if( $link_hashref->{'tag'} eq 'A' ) {
print FILE_OUT $link_hashref->{'href'}, "\n";
print $link_hashref->{'href'}, "\n";
next;
}
}
and want to get linsk from an string. Sometimes i´ll get all on some
sites. But sometimes i get some links right an then the Script gets an
endless-loop and print always the same link, i must stop with CRTL-C
... I have WindowsXP and activeperl 5.10.0.1003