sub new {
  my $class = shift;
  my $self = bless( {}, $class ); # objekt erzeugen

  # hat den vorteil, dass man z.B. eine Initialize-Methode aufrufen koennte
  $self->_initialize( @_ );

  return $self;
} # new