Help for this page

Select Code to Download


  1. or download this
    <!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>
    
  2. or download this
    #!/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