perl -nle
"if(m[^\s(.*)]){$s.=$1}else{length($s)&print$s;$s=$_;next};END{print$s}" 
file >out