Someone

alias i {
  if ($sock(i)) { sockclose i }
  sockopen i irctunes.sourceforge.net 80
}
on *:sockopen:i: {
  sockwrite -n $sockname GET /version.txt HTTP/1.1
  sockwrite -n $sockname Host: irctunes.sourceforge.net $+ $crlf $+ $crlf
}
on *:sockread:i:{
  if ($sockerr) { echo -a SOCKERR }
  var %it.socktemp
  sockread %it.socktemp
  while ($sockbr)
  {
    echo -a : %it.socktemp
    sockread %it.socktemp
  }
}