看板 [ Perl ]
討論串[問題] PERL程式請教
共 6 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
2
下一頁
尾頁
#6
Re: [問題] PERL程式請教
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者gilba (AK Trilogy)時間20年前 (2005/06/24 10:02), 編輯資訊
0
0
0
內容預覽:
這樣寫可能還會有點問題. 比如說這樣:. The audience chorused its approval by loud cheering.. 其中的 chorused 可能會被改成 chourused. 如果是一行一個單字的話,可以寫成這樣. $str =~ s/(\w{2,})or$/$1
(還有54個字)
#5
Re: [問題] PERL程式請教
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者gilba (AK Trilogy)時間20年前 (2005/06/24 09:55), 編輯資訊
0
0
0
內容預覽:
好像不需要用 if 的樣子.... chomp($str=<STDIN>);. $str =~ s/(\w{2,})or/$1our/g;. print "$str\n";. --. ※ 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 163.14.83.8. ※ 編輯: gilba 來自
#4
Re: [問題] PERL程式請教
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者gosth (雙星)時間20年前 (2005/06/24 01:49), 編輯資訊
0
0
0
內容預覽:
可能可以這樣:. while (1). {. print "Please input your string: ";. $my_word = <STDIN>;. chomp($my_word);. $new_word = $my_word;. $new_word =~ s/or$/our/g if
#3
Re: [問題] PERL程式請教
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者nimmal (論文便祕ing)時間20年前 (2005/06/24 01:29), 編輯資訊
0
0
0
內容預覽:
我要結尾是or才轉換喔，而且想要從STDIN輸入，我剛試過，. 不行，不過還是謝謝你的回答；. --. ※ 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 221.169.94.16.
#2
Re: [問題] PERL程式請教
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者gosth (雙星)時間20年前 (2005/06/24 01:12), 編輯資訊
0
0
0
內容預覽:
我的 Perl 功力不高啦，我的直覺寫法是：. $_ = "color";. s/or$/our/g if length > 4;. print;. 我的想法是，假設你輸入某咚咚到預設變數 $_. 然後你先計算長度，用 length($_) 省略 $_. s/or$/our/g 就是將 預設變數裡以
首頁
上一頁
1
2
下一頁
尾頁