a=0$0{for(b=FS=_;1<$0=$0a;sub(".[^"$1"]*.",_))b=b$1}$0=b