perl文件另存解决思路

perl文件另存
如何将打开的新文件中的指定内容输出并且另存到一个新的文件中？？？

[解决办法]
两种方法
一是只写方式写开文件，把内容写进去

Perl code

open FPO, ">test.txt";print FPO "content";close FPO;
[解决办法]
Perl code
use File::Copy;copy("src.pl", "des.txt");
[解决办法]
嗯，都可以，后者比较省事儿。

条条大路通罗马。