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