Socket TCL

[tow]

Bonjour, je souhaiterai me connecter sur un page web en socket comme pour mIRC :

Code :

alias socket {
  sockclose socket
  sockopen socket www.domain.dot 80
}

On *:SOCKREAD:*:{
    var %read
    sockread %read
    echo -a %read (que je veux voir s'afficher en putlog sur l'eggdrop)
}

ON *:SOCKOPEN:*:{
  sockwrite -nt $sockname GET /url.dot HTTP/1.0
  sockwrite -nt $sockname Host: www.domain.dot
  sockwrite -nt $sockname User-agent: eggdrop TCL
  sockwrite -nt $sockname $crlf
}

Mais je n'ai trouvé aucun script qui me parle (quand je dis cela, c'est que je ne sais pas vraiment quoi et où chercher ça)
Quelqu'un aurait-il une piste ou un code pour m'aider à faire ce script ?