看板 [ Perl ]
討論串[問題] 判斷與取代
共 3 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓2(2推 0噓 3→)留言5則,0人參與, 最新作者sosojopoor (KeiDanX)時間10年前 (2014/06/30 19:14), 編輯資訊
1
0
1
內容預覽:
各位板上前輩大家好. 小弟我剛接觸perl有些問題想請教. 主要是判斷&取代的問題. -----------原始碼-----------. (port I0 (direction INPUT)). (instance (rename ABC_1def "CBA.gh3") (viewRef X).
(還有594個字)

推噓1(1推 0噓 1→)留言2則,0人參與, 最新作者Neisseria (Neisseria)時間10年前 (2014/06/30 22:23), 編輯資訊
1
0
2
內容預覽:
提供某一種解法,參考看看.... 假設一個雜湊 %replace_list,裡面放的是字母和數字的對應. 即 a=1 b=2 c=3 .... 寫一個函數來替換字母,在轉換前,先將字母轉小寫. sub replace_abc_123 {. my $string = shift;. my $outpu
(還有190個字)

推噓7(7推 0噓 5→)留言12則,0人參與, 最新作者AntaresStar時間10年前 (2014/07/01 22:04), 編輯資訊
0
0
2
內容預覽:
剛剛稍早po的不對 重po一次. %replace_list可以這樣生 (我改叫%h 短一點). @h{'a' .. 'z'} = @h{'A' .. 'Z'} = (1 .. 9, map {0} 1 .. 17);. 然後replace_abc_123可以這樣寫. $output = join
(還有14個字)
首頁
上一頁
1
下一頁
尾頁