Re: [問題] 字串比對次數?
※ 引述《deh3215 ()》之銘言：
: 舉例:
: #!/usr/bin/perl
: $str="http://secure.ooo.com.secure.ijm.secure";
: if ($num=$str =~/(secure)*/) {
: print $num;
: }
: 希望可以印出比對secure的次數
: 不論是$num=$str =~/(secure)*/
: 或是$num=$str =~/secure*/
: 或是$num=$str =~/secure/
: $num值都為1..應該是3 囧
#!/usr/bin/perl
$str = 'http://secure.ooo.com.secure.ijm.secure';
$num = grep(/secure/, split(/[^a-z]/, $str));
print $num . "\n";
這樣 $num 就會是 3 了...
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.232.172.163
※ 編輯: giacch 來自: 118.232.172.163 (11/23 23:51)
→
11/24 00:32, , 1F
11/24 00:32, 1F
→
11/24 00:33, , 2F
11/24 00:33, 2F
推
11/24 00:41, , 3F
11/24 00:41, 3F
→
11/24 00:50, , 4F
11/24 00:50, 4F
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
