使用perl脚本更改文件的选定内容

Question

我需要帮助来编写一些Perl代码来替换文本文件中的一些选定值。以下是我的文本文件示例。

  

服务器= host1的

network=true
start=false
end=YYYYMMDD
key=34

更改为

  

服务器主机=

network=false
start=true
end=YYYYMMDD
key=10

我希望start和network的值随机生成false或true.sometimes true有时为false

Answer 1

perl -i.bak -lpe'
    for my $word (qw(network start)) { 
        s/$word=\K.*/rand > 0.5 ? "true" : "false"/e 
    }
' *.txt