use HTML::LinkExtor; $p = HTML::LinkExtor->new(\&cb, "http://www.perl.com";); sub cb { my($tag, %links) = @_; print FIL "$tag @{[%links]}\n"; } $p->parse_file("index.html");
In reply to Cant figure out this part? by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |