如何将UNIX路径转换为DOS路径

neb*_*lus 3 unix perl dos

需要一个正则表达式或其他方法将UNIX路径转换为DOS路径.

我有

C:/My Document/Photo.gif
Run Code Online (Sandbox Code Playgroud)

需要

C:\My Document\Photo.gif
Run Code Online (Sandbox Code Playgroud)

Sin*_*nür 8

#!/usr/bin/perl

use strict; use warnings;
use File::Spec::Win32;

print File::Spec::Win32->canonpath('C:/My Document/Photo.gif'), "\n";
Run Code Online (Sandbox Code Playgroud)