#!perl -ln0
s/ $1\b//gwhile s/(.+):
//&&print$1