首页 > 代码库 > perl6 修改文件并覆盖

perl6 修改文件并覆盖

use v6;
my $filename = ‘data.txt‘;
my $data = http://www.mamicode.com/slurp $filename;>

 用slurp一次读入整个文件

用s///修改后再用spurt把整个文件写进原文件覆盖

这样即可达到修改原文件的目的

perl6 修改文件并覆盖