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