bind pub * !oku msg_read
proc msg_read {nick uhost hand chan text} { 
  set server "siteniz.com"
  set port 80
  set l 14
  set i 0
  set path "/file.txt"
  set sockdw "[socket $server $port]"
  puts $sockdw "GET $path HTTP/1.0"
  puts $sockdw "User.Agent:Mozilla"
  puts $sockdw "Host: $server"
  puts $sockdw ""
  flush $sockdw
  while {$i <= $l} {
    gets $sockdw linedw
    putquick "PRIVMSG #Etna $linedw"
  } 
}
putlog "Eggdrop File Reader v1.0 - Written By CLubber"