Hi, these few lines of codes works fine if ident is greater than one char or digit, but when ident is one char/digit like->    m@aol.com  or ~m@aol.com  then it bans->    *!*@*.aol.com
I want it to ban  *!*m@*.aol.com in both cases with or without ~
i'll apprecite for your help
 set mask [getchanhost $bnick $channel]
 if {$mask!={}} {
 set mask [maskhost $mask]
 set mask [string trimleft $mask *!]
 set mask *!*$mask
 if {[onchan $knick $channel]} { 		
     putserv "MODE $channel +b $mask"
     putserv "KICK $channel $knick :$reason" 
 }
}
thanks
regards
			
			
									
						
							

 ) and kick the user out with kick reason: "banned: reason"
 ) and kick the user out with kick reason: "banned: reason" .
.