Bonjour,
Je suis debutant dans le domaine du tcl, mon probléme est le suivant, mon code fonctionne parfaitement, sauf pour une chose, il detecte le bout de mot exemple " www " mais ne va pas detecter un spam complet exemple : " www.ton-site.com " j’aurais besoin d’un petit coup de pouce car àprés avoir tout retourner dans tout les sens… Je ne vois pas…
Voici le code ci dessous :
bind pub - http pub_http
bind pub - www. pub_www.
http
proc pub_http {nick host hand chan arg} {
puthelp "PRIVMSG $nick : Spam interdit vous risquez d’être banni !"
puthelp "PRIVMSG #secure : $nick : Spam détecté sur $chan"
puthelp “PRIVMSG #Services : Open Source Spam : http : détecté sur $chan”
}
www
proc pub_www {nick host hand chan arg} {
puthelp "PRIVMSG $nick : Spam interdit vous risquez d’être banni !"
puthelp "PRIVMSG #secure : $nick : Spam détecté sur $chan"
puthelp “PRIVMSG #Services : Open Source Spam : www. : détecté sur $chan”
}