PERL ~s///

[vanea]

как менять в один стринг "/" на "//" и "\\" на "\\\\"

например

"c:\\bc\\bin" -> "c:\\\\bc\\\\bin"
"/usr/" -> "//usr//"

[Chs]

s/([\\\\\\/])/$1$1/g;