to send this into the room, the script after the socket stuff is:
if {[string match "*<p>CENTRAL*" $line]} {
regexp {<p>CENTRAL(.*).</p><br>} $line - central
putserv "PRIVMSG $channel :$central"
} else {
putserv "PRIVMSG $channel :No Info Available"
}
}
}
however, it is sending both lines to the room even if there is data. I've tried putting returns in after, but then it only does the second line.