Voila , g telecharge un bot pour msn ecrit en perl.
Il ne dispose que dassez peu de fonctions et j'essaie d'en rajouter.
Je voulais creer une command pour lui apprendre des mots , genre .learn salut salut ca va , si on dit salut ca repond salut ca va... bref le source se decompose en divers parties dt la plus interessante est le sub sessage qui gere les message que le bot recoit.
Le message est recu et stoqué dans une variable $msg.
 
il y a divers tests sur ce messages puis c la que vient ma fonction:
 
else {
 
    @reps=<REP>;
           @trig=<TRIG>;
 
           for($i=0 ; $i<=@reps ; ++$i){
            if ($msg eq $trig[$i]){
                $reply=$reps[$i];
                }
           }            
 
 }
 
mes fichiers sont declarés ainsi :
 
open(TRIG,"trigger.txt" );
open(REP,"rep.txt" );
 
theoriquement le programme regarde le fichier trigger.txt des questins et renvoie la reponse du fichier rep.txt via la variable $reply
 
le pb est que ca revoie strictement nimporte koi...
D'ou puisse venir?

tu veux faire un truc genre elisa?

Mais pourquoi utiliser 2  fichiers quand 1 seul peut suffir

plus sérieux,
 
on dirait que tes fichiers ne sont pas parcouru    
 
pour parcourir un fichier je fait un truc style
 

 
mais bon c pas trop conseiller de mettre un fichier dans une variable ( ca boufe de la memoire pour presque rien )
exemple du fichier rep.txt
bonjour = je v bien
salut ca va = oui et toi ?