gets;puts$<.read.sub /(\*-*\* |\* ?|.)\K-/,?*