s/$/|$_|$_
/,s#.#print$&^L?$_:y/ |/-+/r#gefor$"x<>