sub updateUser{ my $self = shift; my $pRef = shift; my $dbh = $self->{'dbh'}; my $count; my @query_result; eval{ $count = $dbh->do(" UPDATE smart_model.benutzer SET nachname = '$pRef->{'nachname'}', vorname = '$pRef->{'vorname'}', telnr = '$pRef->{telnr}',sprache = '$pRef->{'sprache'}', aktiv = '$pRef->{'aktiv'}', permission = $pRef->{'permission'}, lastLogin = $pRef->{'lastLogin'} WHERE id = '$pRef->{'id'}';"); };