perlquestion
sumathigokul
<p> Hi perl monks...</p>
<p> Please suggest me how to search and substitute for word with special characters without using back slashes..</p>
<code>
my @nets = "in1_[0], in1_[1]";
</code>
<p> since variable nets contains auto generated words, sometimes it may contain simple words without any special variables as follows </p>
<code>
my @nets = "a_c, b_c, N_05";
</code>
<p> lets say my file has in1_[0] word at many lines of codes and i wrote a perl script to search for in1_[0] i.e. $nets[0] word and replace it with in1_[1] word i.e. $nets[1]... </p>
<code>
while (<DATA>){
print "substitution is done" if (s/$nets[0]/$nets[1]/);
}
</code>
<p>But, while executing the script i understood that special characters [] are present in variable nets, hence this substitution regex statement is not working... i read that i have to use back slashes for those characters... since nets file will be auto generated and sometimes only it may contain array values, how can i generalize this regex script accordingly...</p>
<code>
-DATA-
in1_c[0]
in1_c[1]
in1_c[0]
in1_c[1]
a_c
in1_c[0]
b_c
in1_c[1]
in1_c[0]
in1_c[1]
</code>