配列に要素が無い場合

質問

お世話になっております。

配列 @L に 変数 $N という要素が無い場合に
処理をさせたいのですが、どういった条件文を
書けば良いのでしょうか。

宜しくお願い致します。

回答No.1

BLUEPIXY · ベストアンサー

あんまり効率を考えなくていいなら
$Nが数字の時
$has = grep($_ == $N, @L);
$Nが文字列の時
$has = grep($_ eq $N, @L);
として
要素がないとき、$has==0なので
if($has == 0){
#やりたい処理
}
とすればいいと思います

お礼

御回答有り難う御座いました。
お礼が遅くなりすみません。
結局使わなくなってしまいましたので、御回答頂いた順にptをお入れしております。
ご容赦下さい。

回答No.3

estea

$N や @Lの各要素に　含まれていないと
分かっている文字を用いて，たとえば \t なら

if( join( "\t" , @L) !~ /$N/ )
{
処理。
}

ってのは？
効率？無視です。

お礼

御回答有り難う御座いました。
お礼が遅くなりすみません。
結局使わなくなってしまいましたので、御回答頂いた順にptをお入れしております。
ご容赦下さい。

回答No.2

zebedeer

こんな感じ？
my %chk = map { $_,1 } @L;
unless ($chk{$N}) {
#hogehoge
}

お礼

御回答有り難う御座いました。
お礼が遅くなりすみません。
結局使わなくなってしまいましたので、御回答頂いた順にptをお入れしております。
ご容赦下さい。