if ($loginname =~ /\s/) { # Benutzername enthält mindestens 1 Leerzeichen
  # dann entweder ungültige Zeichen rausnehmen
  #$loginname =~ s/\s//g;
  
  # oder fehlermeldung
  error('Loginname enthält ungültige Zeichen');
}
else {
  # hier mit login weiter
}