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

Question

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

服务器=主机1

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