perl - 我如何从非数字字符串的替换中获得数字？

Question

我是 perl 的新手，有一个小问题:

部分perl代码:

print "${data_dir}\n";
#converting directory path to unix format (replacing all backslashes with slashes)
$data_dir = ~s/\\/\//g;
print "${data_dir}\n";

输出:

C:/dev/../data
4294967295

为什么结果不同？我猜是 $data_dir 变量中的问题，因为这适用于其他字符串，但可能是什么问题？

附言$data_dir 我是从其他模块获取的，不知道它是如何构建的。

Answer 1

= 和 ~ 之间有一个空格。他们应该在一起=~。

$data_dir =~ s/\\/\//g;

您所做的是将 $data_dir 设置为等于 s/\\/\//g 的补码(即 ~ 运算符)，它等于 4294967295。