print/(.)\1*/," ${\/./g} @+[0]
"for<>