[問題] array_search

[liwei0321 (橘子檸檬汽水)]

請問一下  perl是否有類似 php  array_serch的語法

@tmp = ("a","b","c");

我要看d是否有在@tmp裡面


或是只有使用

for (@tmp){
  if ($_ =~ /d/){
    return 1;
  }else{
    return 0;
  }
}

這樣的方式?!!   謝謝

--

阿台  ：哩賣嫩斗親good喔
阿六仔：如果把我惹毛了，我可不是吃素的

                                            http://www.wretch.cc/blog/liwei0321

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 140.113.223.192
推 LiloHuang:if use Perl 5.10, it can be if($pattern ~~ @tmp) {}
→ liwei0321:感謝版主囉!!!!! thx
推 clkao:scalar grep { $_ =~ /d/ } @tmp