2012-08-06 80 views
-2

我需要帮助来编写一些Perl代码来替换文本文件中的某些选定值。以下是我的文本文件的示例。使用perl脚本更改文件的选定内容

服务器= host1的

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

变化到

服务器主机=

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

我想要开始和网络,以产生RANDO值有时虚假或真实。有时真实有时虚假

+1

到目前为止你写了什么? – 2012-08-06 17:14:54

+0

你的问题有很多背景缺失......这个练习的目的是什么?为什么在Perl中?最重要的是,[你有什么尝试](http://www.whathaveyoutried.com/)? – thkala 2012-08-06 17:19:22

+0

@thkala actully我需要运行一些系统命令之前,我想为一些随机生成的值{true/false}为给定的字段,因为我需要通过随机生成的文件作为输入的几种情况 – 2012-08-06 17:22:17

回答

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