Bonjour,

J'ai actuellement un Bot irc qui ce connecte a un serveur unrealircd et je voudrez pouvoir le connecter par LINK pouvez vous m'aider S.V.P ?

Voici mon bout de code de connexion :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
sub connect() {
 
  $sock = new IO::Socket::INET(PeerAddr => $server,
			                    PeerPort => $port,
			                    Proto => 'tcp') or die "Can't connect\n";
 
  &command ("NICK $bot_nick");
  &command ("USER $bot_login 8 * :$bot_real_name");
 
  while (my $input = <$sock>) {
    $input = &chomp($input);
    print "> $input\n";
 
    if ($input =~ /004/) {
      last;
    }
    elsif ($input =~ /433/) {
      die "Nickname is already in use.";
    }
  }
 
}