perl程序的求助

carveoutlove · 发表于 2016-7-9 19:38:34

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？注册

x

各位大牛好：    小弟有一个文本如下：
(CELL hvnmos4
   (CELLTYPE GENERIC))

(CELL hvpmos4
   (CELLTYPE GENERIC))

      (INSTANCE X734(HVN734)
         (VIEWREF symbol
            (CELLREF hvnmos4）

      (INSTANCE X735(HVN735)
         (VIEWREF symbol
            (CELLREF hvnmos4）

      (INSTANCE X736(HVP736)
         (VIEWREF symbol
            (CELLREF hvpmos4）

      (INSTANCE X737(HVP737)
         (VIEWREF symbol
            (CELLREF hvpmos4）

目前想把有hvnmos4中INSTANCE X734变为刮号中 HVN734，hvpmos4同样的规则，发现有点复杂，对程序也不是很了解，还望得到各位大牛的帮助，多谢了！

danzhang · 发表于 2016-7-16 10:56:37

s/\\n//g; #把所有的换行符去掉，让每一个模块变成一行#
if (/hvn/i) #匹配有hvn的行#
s/INSTANCE(..)/HVN/g; #进行替换#
if (/hvp/i)
s/INSTANCE(..)/HVP/g;
不知道写的对不对？我也是新手

[求助] perl程序的求助

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

站长推荐 /3