I made a start but its returning anything,
on $*:text:/^!summary$/iS:#: {
if ($sock(summary)) sockclose summary
sockopen summary muse.erpk.org 80
sockmark summary msg #
msg # Tank Nation -
http://muse.erpk.org/unit/2162}
on *:sockopen:summary: {
sockwrite -nt summary GET /unit/2162 HTTP/1.1
sockwrite -nt summary Host: $+($sock(summary).addr,$str($crlf,2))
}
on *:sockread:summary: {
var %summary | sockread %summary
if ($regex(%summary,/\<div class="well bottom">9 253"<\/div>/)) {
$sock(summary).mark $remove($regml(1), )
sockclose summary
}
}