perl 多文件间变量替换
file1: {-1,0,1} 3个元素

file2: { value>0;
value=0;
value<0;} 3个变量判断


如果想让value分别被赋值file1中元素的值 放到file3里面 该怎么做呢？

结果想实现 file3:{ -1>0; 0>0; 1>0; 0>0; 0=0; 0<0; 1>0; 1=0; 1<0;} 改怎么做呢？

[解决办法]

Perl code

my @file1=(-1,0,1);my @file2=('value>0','value=0','value<0');my @file3;foreach my $f1 (@file1){   foreach my $f2 (@file2)   {      $f2=~s/value/$f1/;      push(@file3,$f2);   }}print("@file3\n");