NAME

Data::Stag::BaseHandler     - Base class for writing tag stream handlers

SYNOPSIS

package MyPersonHandler;
use base qw(Data::Stag::BaseHandler);

use vars qw($VERSION); $VERSION="0.01";

# handler that prints person nodes as they are parsed
sub e_person {
    my $self = shift;
    my $node = shift;
    printf "Person name:%s address:%s\n",
      $node->sget('name'), $node->sget('address');
    return [];  # delete person node
}

package MyPersonHandler;
use base qw(Data::Stag::BaseHandler);

# handler that modifies tree as it goes
sub e_measurement {
    my $self = shift;
    my $node = shift;
    if ($node->sget('unit') eq 'inch') {
        $node->set('unit', 'cm');
        $node->set('quantity', $node->get('quantity') * 2.5);
    }
    return;   # returnig null leaves it unchanged
}

DESCRIPTION

Default Simple Event Handler, other handlers inherit from this class

See also Data::Stag

This class catches Data::Stag node events (start, end and body) and allows the subclassing module to intercept these. Unintercepted events get pushed into a tree.

This class can take SAX events and turn them into simple Data::Stag events; mixed content and attributes are currently ignored. email me if you would like this behaviour changed.

the events recognised are

start_event(node-name)
evbody(node-data)
end_event(node-name)

and also

event(node-name, node-data|node)

which is just a wrapper for the other events

you can either intercept these methods; or you can define methods

s_<element_name>
e_<element_name>

that get called on the start/end of an event; you can dynamically change the structure of the tree by returning nodes from these methods

PUBLIC METHODS -

tree

Usage   -
Returns -
Args    -