my $parser = new  XML::Parser (Handlers =>{ Start =>\&hdl_start});