Help for this page

Select Code to Download


  1. or download this
    package OO::SubModule;
    
    sub new {
    ...
    }
    
    ## You can say $self->_debug("booya") to do $self->{debug_cb}->("booya
    +") without it ending up in the call stack
    
  2. or download this
    ## both apps
    
    $oosub = OO::SubModule->new({
    ...
    
    ## Any occurrence of $self->_debug("booya") within OO::SubModule reall
    +y does _debug("booya") of the main app, this way
    ## Without getting in the call stack, right?