看板 [ Perl ]
討論串[問題] 關於加字串的問題~~~
共 3 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#3
Re: [問題] 關於加字串的問題~~~
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者pziyout (pziyout)時間17年前 (2008/05/02 12:14), 編輯資訊
0
0
0
內容預覽:
來個簡單版的. open(D,"APDmap.list") ;. chomp, print ( /\.pdb\s*$/ ? "$_\n" : "$_.pdb\n" ) for <D> ;. --. ※ 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 140.115.25.24.
#2
Re: [問題] 關於加字串的問題~~~
推噓1(1推 0噓 0→)留言1則，0人參與, 最新作者Chris7462 (～烤焦麵包～)時間17年前 (2008/03/31 12:40), 編輯資訊
0
0
0
內容預覽:
#!/usr/bin/perl -w. use strict;. open List,"< APDmap.list";. @_ = <List>;. close List;. foreach ( @_ ){. chomp;. if (/\.pdb$/){. print "$_\n";. } else
(還有21個字)
#1
[問題] 關於加字串的問題~~~
推噓0(0推 0噓 1→)留言1則，0人參與, 最新作者pcikilo (Mm~~~)時間17年前 (2008/03/31 11:01), 編輯資訊
0
0
0
內容預覽:
就是假設我的list 裡面的格式是. ACSDJ.map. fjsak.dsd. djidj.pdb ....... 就是前面有五個隨便的字元..後面有".XXX". 那我想要程式先檢查是否有 ".pdb" 如果有的話 ..就不用加了. 如果沒有則後面加".pdb". 下面是我寫的 我的想法是先將每
(還有403個字)
首頁
上一頁
1
下一頁
尾頁