Help for this page

Select Code to Download


  1. or download this
    sub Call {
        my $self = shift;
    ...
            $self->Trace(_CallerStr($it));
        return $it;
    };
    
  2. or download this
    our $AUTOLOAD; # needs to be a package global
    sub AUTOLOAD {
    ...
       splice @_, 1, 0, $AUTOLOAD; # package/object, method, rest of args
       goto \&Call;
    }