(" "*10:\readLine){(_,z)=>println(z)
z replaceAll("\\\\./"," | ")replaceAll("(\\\\+)."," $1")replaceAll(".(/+)","$1 ")}