sub tuwas {
    my &#36self = shift;

    &#36self->_machnochwas();
}

sub _machnochwas {
    my &#36self = shift;

    ...
}