Code:
$read(filename,w,*%server*)


returns the entire line on which %server appears. $readn will hold the linenumber.