pump $h until ($out =~ /(BRU Server >)|(error message here)/i);