正则里能有变量吗。。新手

落羽飘寻

1. open  SQLTEST, ">c:\DINO.txt";
   
2. while (<>) {
   
3. chomp;
   
4. ##print "it was $_ that i saw!\n";
   
5. $_=~s/ union\s*all /\n##################\nunion all\n####################3\n /x;
   
6. my $a=$_;
   
7. print SQLTEST  "$a\n";
   
8. }

复制代码

这段代码是在sql里碰到union all 就前后空行的代码 不知道这个union all要是一个变量可不可以写在 正则里呢
请指教

open  SQLTEST, ">c:\DINO.txt";
chomp($line=<STDIN>);
while (<>) {
chomp;
##print "it was $_ that i saw!\n";
$_=~s/ union\s*all /\n##################\nunion all\n####################3\n /x;   这段是否可以修改呢？my $a=$_;
print SQLTEST  "$a\n";
}
变量能放到正则里吗。。。

jin2251138

可以

落羽飘寻

可以
jin2251138 发表于 2011-05-26 01:25

请问该如何修改呢。。？