你好，麻烦帮忙看一下，在perl 里面$^I这个做了什么？

Question

$^I=".back";while(<>){s/\s+|,/ /g;print;}如果这样print不到终端里面？而如果去掉$^I 就可以输入到终端里面？$^I 书上说是写回到文件且备份的作用，按理说不应该影响print啊！难道是windows的环境的问题？

Answer 1

使用$^I的时候，是in place修改，也就是在源文件中修改，并将备份源文件。
这时候，已经将STDOUT修改为你在修改的文件了，所以输出是直接输出到文件中的。
你想，如果没有将STDOUT修改为你正在读取的文件，那$^I怎么起到原地修改的作用啊。