Erreur inconnue et non signalée

[teck23]

Bonjour a tous , c'est ma premiére participation sur ce forum , j'ai un petit soucis avec mon bot , le code est bien fait (j'en suis pas sur) mais il réagis pas a la commande , il detecte rien en pl .... au debut un membre du forum (Heretoc) m'a dit que c'etait peut étre en rapport avec les droits de lecture/ecriture sur le fichier mais c'etait pas le cas , voici le code , merci de me dire s'il vous plait d'ou vient l'erreur:

tclcopier

bind pub - !connect connects
proc connects { nick uhost handle channel arg } {	
	putquick "NOTICE $nick :\0033..:Liste des connexions:.."
	catch {open "./scripts/connect.db" "r"} connexion
	set num 0
	while {![eof $connexion]} {
	gets $connexion verif
	if {$verif ne ""} {incr num 1;putquick "NOTICE $nick :\0034 $num -->\0033 [lrange $verif 0 end] \r"}
	}
	if {$num eq "0"} {putquick "NOTICE $nick :\0034Aucune connexion dans la base de donnée ! \r; return 0"}
	putquick "NOTICE $nick :\0033Fin de la Liste (\0034 $num \0033connexion(s) enregistré(s))"; return 0
	catch {close $connexion}
}

ps: méme avec des petits codes il réagis pas .... :

tclcopier

bind pub - !test v_test
proc v_test { nick uhost handle channel arg } {	
putfast "privmsg #serveur : ok "
}

Bonne journée a tous