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 -f %it.socktemp
  while ($sockbr) {
    echo -a : %it.socktemp
    sockread -f %it.socktemp
  }
}