Help for this page

Select Code to Download

Select or download this
```
while(my $line = <FH>)
```

Select or download this

@links = $parser->links;
if ( @links == 0 ) {
    warn "no links found in $name\n";
    return;
}