Help for this page

Select Code to Download


  1. or download this
    my $class = shift;

...
$self->{_myOwnattributes} = $that;

bless($self, $class);
  2. or download this
    sub funcA{
eval { $self->SUPER::funcA(); };
_handle_eval($self);
}
  3. or download this
    funcA{
$self = shift;
Yada Yada Yada....
$self->funcB();<--- Which I had also overridden!!
}