Help for this page
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN"> <HTML> <HEAD><TITLE>Test</TITLE></HEAD> ... <a name="foo>bar" href="foobar"></a> </BODY> </HTML>
#!/usr/bin/perl -wl use strict;use HTML::Parser;my $p=HTML::Parser->new(api_version =>3);$p->handler(start=>sub{print shift->{href}if shift eq 'a'}, 'tagname,attr');local $/;$p->parse(<>);#Just another URI finder