on *:input:*:if $regex($1-,^[^!\/\.]) { msg $active $replace($1-,:,¦) | halt }