リスト内に任意の値が含まれているかどうかを確認する

• anyを使う
  • List::MoreUtils - Provide the stuff missing in List::Util - metacpan.org
  • サンプル

use List::MoreUtils qw/any/;

my @list_target = ('my', 'chuno', 'blog');

if (any {$_ eq 'chuno'} @list_target) {

  # 何らかの処理を書く
}