this code my friands from mircx :) enjoy friands

alias walla sockopen walla news.walla.co.il 80
on *:sockopen:walla:{
  window -e @walla
  var %a = sockwrite -n $sockname
  %a GET / HTTP/1.1
  %a Host: news.walla.co.il
  %a Keep-Alive: 300
  %a Connection: keep-alive
  %a 
}
on *:sockread:walla:{
  var %data
  sockread %data
  while $sockbr {
    if %walla {
      noop $regex(%data,/<span class=w1>(.+?)<\/span>/)
      var %time = $regml(1)
      noop $regex(%data,/<span><a href="(.+?)" .+?>(.+?)<\/a>/)
      var %link = http://news.walla.co.il/ $+ $regml(1)
      if $regml(2) != %news {
        set %news $regml(2)
        msg #J_Bot $remove(Walla NewsFlash: %News %Link,$chr(13))
      }
    }
    if <div id="gNewsA"> == %data { set %walla 1 }
    sockread %data
  }
}