Miscellany

alias gerrits  sockclose gerrits | sockopen gerrits notredameofdepere.com 80 
on *:sockopen:gerrits: { 
  sockwrite -n $sockname GET /?page_id=111&parent_page_id=92  HTTP/1.1 
  sockwrite -n $sockname Host: notredameofdepere.com 
  sockwrite -n $sockname $crlf
}
on *:sockread:gerrits: { 
  if ($sockerr) { echo -a Error. | halt }
  else {
    var %temp
    sockread %temp 
    if (*Welcome to* iswm %temp) { 
      notice %gerrits Current Homework: $replace($gettok($nohtml(%temp),2,61), ,$chr(32))
      .timerSOCKET 1 2 sockclose gerrits
    } 
  }
}
on *:TEXT:!hwgerrits:#: { if ($chan == #GreaterCat) {
    set %gerrits $nick 
    gerrits
  }  
}