在shell的循环中将变量传入perl

用 单引号双引号$i双引号单引号 这样的写法从shell的循环中传入变量

 

具体如下：

 

for i in `lssrc -a|grep "cics/."|grep -v grep|grep -v ABC|awk {'print substr($1,6)'}`;
do
echo ===$i===
perl -p -i -e 's/ABC/'"$i"'/g' /var/cics_regions/$i/server.ini
done