执行命令：perl -p -i -e "s/sysread/read/g" test.txt 时，报错：can't do inplace edit without bakcup。
在网上搜索了一下，发现应该在 -i 后加一个扩展名，如 -i.old，此时就会生成 test.txt.old备份文件，而源文件被直接修改。
