Perlで配列Aに含まれて居て配列Bに無いものを抽出しようとして foreach (@arrA){ unless(grep(/^$_$/,@arrB)){ push(@newarr,$_) } } というのを書いたんですが、これがうまく動かない。 どうも調べて見ると配列Bが一件も無い場合は良いのですが、配列Bに1件でも要素があると配列Aの要素が全て配列Bにあると判断される模様。 まぁ、世の中には
Perlで配列Aに含まれて居て配列Bに無いものを抽出しようとして foreach (@arrA){ unless(grep(/^$_$/,@arrB)){ push(@newarr,$_) } } というのを書いたんですが、これがうまく動かない。 どうも調べて見ると配列Bが一件も無い場合は良いのですが、配列Bに1件でも要素があると配列Aの要素が全て配列Bにあると判断される模様。 まぁ、世の中には
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く