Comparer un masque de host avec un host

Pourquoi faire compliqué ?

code
string match -nocase $hostmask $host

Exemple
string match -nocase "Truc*!*machin@*.cool.domain.net" "Truc!machin@EpiK-01234567.cool.domain.net" Tcl: 1