[問題] perl的elsif問題
my $str='haha_foo_bar';
if($str =~ /haha.*foo.*bar/)
{
print "Match haha.*foo.*bar\n"
}
elsif($str =~ /haha.*bar/)
{
print "Match haha.*bar\n";
}
else
{
print "Match .*bar\n";
}
代碼執行輸出
Match haha.*foo.*bar
但elsif那個為什麼沒執行呢﹖
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 147.243.236.28
推
03/18 17:17, , 1F
03/18 17:17, 1F
Perl 近期熱門文章
PTT數位生活區 即時熱門文章