eRPK test 1

on *:text:.derp:#: {
  erpk
  msg $chan hi!
  msg $chan %derp
}
alias erpk {
  if ($sock(erpk)) { sockclose erpk }
  sockopen erpk erpk-api.com 80
}
on *:sockopen:myip:{
  ;to tell the server which file you want to receive
  sockwrite -n $sockname GET /citizen/profile/2109804.json?key=fkqquQ2Y8v HTTP/1.0
  sockwrite -n $sockname Host: erpk-api.com
  sockwrite -n $sockname user-agent: Mozilla/??
  sockwrite -n $sockname Connection: Keep-Alive
  sockwrite -n $sockname $crlf
}
on *:sockread:erpk:{
  if ($sockerr > 0) return
  :nextread
  sockread %temp1
  if ($sockbr == 0) return
  if ("id" isin %temp1) {
    set %derp $gettok(%temp1,2,44)
  }
  goto nextread
}