看板 [ Perl ]
討論串[問題] 字串比對次數?
共 3 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#3
Re: [問題] 字串比對次數?
推噓1(1推 0噓 4→)留言5則，0人參與, 最新作者newnewest (newnewest)時間16年前 (2008/11/24 12:18), 編輯資訊
0
0
1
內容預覽:
要用 match global 吧... if (@num = $str =~/secure/g). {. print scalar(@num);. }. --. ※ 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 67.188.125.61.
#2
Re: [問題] 字串比對次數?
推噓1(1推 0噓 3→)留言4則，0人參與, 最新作者giacch (小ａ)時間16年前 (2008/11/23 23:50), 編輯資訊
0
0
2
內容預覽:
#!/usr/bin/perl. $str = 'http://secure.ooo.com.secure.ijm.secure';. $num = grep(/secure/, split(/[^a-z]/, $str));. print $num . "\n";. 這樣 $num 就會是 3 了
#1
[問題] 字串比對次數?
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者deh3215時間16年前 (2008/11/23 23:30), 編輯資訊
0
0
1
內容預覽:
舉例:. #!/usr/bin/perl. $str="http://secure.ooo.com.secure.ijm.secure";. if ($num=$str =~/(secure)*/) {. print $num;. }. 希望可以印出比對secure的次數. 不論是$num=$str
首頁
上一頁
1
下一頁
尾頁