# prüfung auf inhalt
  if (index($q->param('required'),$feld) >= 0) {
    if (index($feld,"Mail") >= 0) {
      if (index($q->param($feld),"@") < 0 or index($q->param($feld),".") < 0 or index($q->param($feld)," ") >= 0) {
        $cMeldErrTxt = 'E-Mail Adresse: falsche Syntax oder leer';
        $lAnyErr = 1;
      }
      # beide MailAdressen gleich ?
      elsif ($nEMail > 1) {
        if (index($q->param("SE-Mail"),$q->param($feld)) < 0) {
          $cMeldErrTxt = "E-Mail Adressen nicht gleich";
          $lAnyErr = 1;
        }
      }
    } 
    elsif (length($q->param($feld)) < 0) {
      $cMeldErrTxt = "Feld darf nicht leer sein!\n";
      $lAnyErr = 1;
    }
  }
  # nötig ende nun die sonderfälle