I don't know why all the timers are needed. You don't really need to tokenize:
Code:
on *:sockread:random:{
if ($sockerr) { halt }
else {
var %sockreader
sockread %sockreader
if (<h1> isin %sockreader) {
msg #dj-serv $remove($v2,<h1>,</h1>)
sockclose random
}
}
}