my $self = shift;
    return $self->_sub1();

##</code><code>##

sub XXX() { ... }

##</code><code>##

sub XXX { ... }