diff -urN smeserver-ddclient-1.2.1.old/root/etc/e-smith/web/functions/ddclient smeserver-ddclient-1.2.1/root/etc/e-smith/web/functions/ddclient
--- smeserver-ddclient-1.2.1.old/root/etc/e-smith/web/functions/ddclient	2019-12-30 03:25:56.194410766 +0000
+++ smeserver-ddclient-1.2.1/root/etc/e-smith/web/functions/ddclient	2019-12-30 04:15:53.736372049 +0000
@@ -639,7 +639,7 @@
     }
 
     my $domainLogin = $q->param ('login');
-    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.]*)$/)
+    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.\@]*)$/)
     {
 	$domainLogin = $1;
     }
@@ -799,7 +799,7 @@
     }
 
     my $domainLogin = $q->param ('login');
-    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.]*)$/)
+    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.\@]*)$/)
     {
 	$domainLogin = $1;
     }
@@ -1066,7 +1066,7 @@
 
     my $domainDesc = $q->param ('desc');
     my $domainLogin = $q->param ('login');
-    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.]*)$/) {
+    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.\@]*)$/) {
 	$domainLogin = $1;
     } else {
 	showInitial ($q, $fm->localise('DOMAIN_LOGIN_VALIDATION_ERROR',
@@ -1226,7 +1226,7 @@
     }
 
     my $domainLogin = $q->param ('login');
-    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.]*)$/) {
+    if ($domainLogin =~ /^([\-\'\w][\-\'\w\s\.\@]*)$/) {
 	$domainLogin = $1;
     } else {
 	showInitial ($q, $fm->localise('DOMAIN_LOGIN_VALIDATION_ERROR',