alias lh {
%un = $$1
sockopen lh localhost 6080
}
on *:sockopen:lh: {
sockwrite -n $sockname GET $+(/s3h/getdetails.php?,%un) HTTP/1.1
sockwrite -n $sockname Host: $+(localhost,$crlf,$crlf)
}
on 1:sockread:lh: {
if ($sockerr > 0) return
:nextread
sockread %lh
if ($sockbr == 0) return
if (%lh == $null) %lh = -
if (Generated* iswm %lh) return
if (: isin %lh) echo -a $gettok(%lh,2,58)
goto nextread
}