$ip update on a Bouncer (znc/bnc)

on *:connect:{ .timerdyn.update -o 0 10 dyn.update | dyn.update }
alias dyn.update { /sockclose dyn.update.* | /sockopen dyn.update. $+ $ticks www.edv-man.de 80 }
on *:SOCKOPEN:dyn.update.*:{
  if ($sockerr > 0) { return }
  sockwrite -n $sockname GET /getip.php HTTP/1.1
  sockwrite -n $sockname Host: www.edv-man.de $+ $crlf $+ $crlf
}
on *:SOCKREAD:dyn.update.*:{
  unset %dyn.buffer
  var %dyn.buffer
  sockread %dyn.buffer
  if ($wildtok(%dyn.buffer,*.*.*.*,0,32) == 1) {
    /scid -a /localinfo %dyn.buffer %dyn.buffer
    .timerdyn.update off
    echo -s Host updated to %dyn.buffer
    return
  }
}