perl 多文件间变量替换解决办法

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");