Help for this page

Select Code to Download


  1. or download this
     
my $p = new XML::Parser (Handlers => {Start => sub{hdl_start($tag, $na
+me, @_)},
...
  2. or download this
    sub hdl_start {
    $_[0] = $_[2];
    $_[1] = $_[3];
}