Bonjour,
J'ai suivi ce tuto pour faire un bot irc
http://www.squalenet.net/fr/pc/articles/ecrire-un-bot-irc-en-perl-part2.php5
J'ai essayé de mettre des commandes pour modérer un chan(voice,op,ban,kick,etc...)
if ($commande eq 'voice')
{
my @params = grep {!/^\s*$/} split(/\s+/, substr($text, length("!$commande")));
if (defined($params[0]) && $params[0] ne '')
{ # Un paramètre (non vide) a été passé à la commande
# => On va pouvoir l'utiliser
$conn->mode($channel,'+v $params[0]');
}
else
{ # Un paramètre attendu n'a pas été fourni à la commande...
$conn->print("Un paramètre attendu");
}
Voici le code pour les commandes, la commande est reconnue mais quand j'essaye ça sur un chan rien ne se passe
pourtant dans la RFC de irc
Command: MODE
Parameters: <channel> *( ( "-" / "+" ) *<modes> *<modeparams> )
exemples: MODE #Finnish +v Wiz
ça devrait être bon non ? je ne vois pas ce qui cloche
merci