Q: HTML::Parser - reference to a hash

[Axel Tietje]

Hi,

I've got the following problem: I don't understand how to access the
variable $attr in this example:

# CUT

package MyParser;
use HTML::Parser;
use HTML::Entities qw(decode_entities);

@ISA = qw(HTML::Parser);

sub start {
  my($self, $tag, $attr, $attrseq, $origtext) = @_;
  if ($tag eq "a"){
    # HOW CAN I ACCESS $attr , e.g. href?
  }
}

package main

  MyParser->new->parse($html);
  ...

# CUT

Manual says: [...]and the second argument ($attr) is a reference to a hash
that contain all attributes found within the start tag.[...]

Any hint?

TIA, Axel.
--
FLYnet - FLYer Kommunikationsgesellschaft mbH
Weender Landstr. 46           37073 Göttingen
http://www.flynet.de       [EMAIL PROTECTED]

---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]