sub new {
    my $class = shift;
    my $self = bless {}, $class;
    $self->{plugin} = $Plugin_Package->new(); # gleich
    return $self;
}

sub init {
    # ...
    $self->{plugin} = $Plugin_Package->new(); # oder später
    $self->{plugin}->some_method();
    # ...
}

sub get_key {
    # ...
    $self->{plugin}->some_method();
    # ...
}


sub reset {
    # ...
    $self->{plugin}->some_method();
    # ...
}

sub run {
    # ...
    $self->init();
    # ...
    $self->getc();
    # ...
    $self->reset();
}