sub do_something {
    my $self = shift;
    $self->SUPER::do_something( @_ );
    # do some more stuff
}