[問題] 判斷與取代

看板Perl作者 (KeiDanX)時間10年前 (2014/06/30 19:14), 編輯推噓2(203)
留言5則, 2人參與, 最新討論串1/3 (看更多)
各位板上前輩大家好 小弟我剛接觸perl有些問題想請教 主要是判斷&取代的問題 -----------原始碼----------- (port I0 (direction INPUT)) (instance (rename ABC_1def "CBA.gh3") (viewRef X) (portRef I0 (instanceRef ABC_1def)) (portRef I1 (instanceRef iJk_1def)) (port LO (direction OUTPUT)) (portRef O (instanceRef ABC_1def)) -----------判斷&修改後----------- (port I0 (direction INPUT)) (instance (rename 123_1456 "321.783") (viewRef X) (portRef I0 (instanceRef 123_1456)) (portRef I1 (instanceRef 901_1456)) (port LO (direction OUTPUT)) (portRef O (instanceRef 123_1456)) 有兩個關鍵字分別為"rename"和"instanceRef" 1.rename 判斷到有rename後將第一個與第二個空白鍵中的a-Z換成數字 若超過9則為0 也就是a/A=1 b/B=2 ... i/I=9 j/J=0 同時隨後兩個"內的字串依照上述取代 2.instanceRef 判斷到有rename後將第一個空白鍵與第一個)內的a-Z換成數字 取代的規則與前述相同 嘗試使用if判斷與tr 但一直卡在只取代 第一與第二個空白鍵內的a-Z 這邊 請問有人知道該如何處理嗎? 謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.70.4.121 ※ 文章網址: http://www.ptt.cc/bbs/Perl/M.1404126867.A.507.html

06/30 21:48, , 1F
2看不懂...
06/30 21:48, 1F

07/01 09:30, , 2F
2是要判別關鍵字instanceRef後的"第一個空白"至"第一
07/01 09:30, 2F

07/01 09:31, , 3F
個)"內的a-Z換成輸字, 換的規則如1
07/01 09:31, 3F

07/01 11:41, , 4F
可是看你的例子,rename後面的空白沒有被取代掉阿?
07/01 11:41, 4F

07/01 13:35, , 5F
抱歉筆誤 2應該是instanceRef
07/01 13:35, 5F
文章代碼(AID): #1JiKQJK7 (Perl)
討論串 (同標題文章)
文章代碼(AID): #1JiKQJK7 (Perl)