sub new {
        my $class = shift;
        my ($id, $nachname, $vorname, $telnr, $sprache, $aktiv) = @_;
        my $self = $class->SUPER::new($id, $nachname, $vorname, $telnr, $sprache, $aktiv);
        $self->{'letzterLogin'} = "";
        $self->{'berechtigung'} = 0;
        return $self;
}