使用Perl的换行符说\n\r

我想使用dos换行符格式的

say

：

说“foo”

应该显示

foo\r\n

我试图重新定义新行变量，但它没有改变任何东西

 local $/="\r\n"; 

另一种解决方案是手动写入：

 print "foo\r\n"; 

---

但是它不是很方便

不要使用影响所有句柄的全局变量；使用

open(my $fh, '>:crlf', ...)

或

---

：默认情况下，已在Windows计算机上为您添加了crlf

，但在

打开
中指定它或尝试使用
binmode
将其添加到已具有它的句柄不会有任何影响。
不要使用影响所有句柄的全局变量；使用

open(my $fh, '>:crlf', ...)

或

：默认情况下，已在Windows计算机上为您添加了crlf
，但在
open
中指定它或尝试使用
binmode
将它添加到已具有它的句柄中不会有任何影响。
local$\=“\r\n”；打印“foo”哦！我不知道
$/
和`$\` existsDOS newline都是
\r\n
@M42您是对的：）@coin对于您所有的特殊变量需求，我可以推荐perlvar:
local$\=“\r\n”；打印“foo”哦！我不知道
$/
和`$\` existsDOS newline都是
\r\n
@M42您是对的：）@coin对于您所有的特殊变量需求，我可以推荐perlvar:这是最好的方法。这是最好的方法。