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