$,=$/;$_='/\\'x64;
@a=($_,@a),
s!/\\!('/ ',' \\')[$i++%2]!eg,
s!/ ! /!g,s! \\!\\ !g,while/\\/;
print@a