my $sql = "SELECT passwort from members where nickname='root'";
my ($password) = $dbh->selectrow_array($sql);
defined ($password) or die "Error in sql: $DBI::errstr\nSql: $sql\n";