mobile nr country substitute

This commit is contained in:
Rainer Gümpelein 2022-01-10 12:33:49 +01:00
parent 4ccea2b0a1
commit d928abe0ec
7 changed files with 20 additions and 10 deletions

View file

@ -366,7 +366,7 @@ sub save_account(){
#phonenr
}elsif($_ eq "txt07"){
$valxx =~ s/[\s\-\/]//g;
if($valxx !~ /\d{9}/ || length($valxx) > 16 || $valxx !~ /\+[1-9]{3}/){
if($valxx !~ /\d{9}/ || length($valxx) > 16){
$ret = "failure::$_#top";
}else{
my $lastnum = $valxx;