sub method {
    my $this = shift;
    
    $this->do_some_initialization;
    $this->do_something_which_can_be_overriden_in_subclasses();
    $this->do_some_cleanup;
}