データが不完全な行を削除するためのawkまたはPerlソリューション

Question

完全なデータを持たない行をすべて削除できるAwkまたはPerlの1ライナーはありますか？私は自分自身にこのようなものが頻繁に必要であることが分かりましたどのようにフィールド2に値を持たない行を削除することができ

1 asdf 2 
9 asdx 4 
3 ddaf 6 
5   4 
2 awer 4 

：たとえば、私は現在、次のようになり、タブ区切りのファイルがありますか？

どのようにANYフィールドのいずれかに値を持たない行を削除できますか？

私はこのような何かをしようとしていた。

awk -F"\t" '{if ($2 != ''){print $0}}' 1.txt > 2.txt 

感謝を。 awkでは

Answer 1

、あなたはすべての行が正確に3つの要素持っている必要があることを知っている場合：汎用的なソリューションについて

awk -F'\t' '$2 != ""' input.txt > output.txt 

：具体的な解決のために

awk -F'\t+' 'NF == 3' INFILE > OUTFILE 

Answer 2

perl -F/\t/ -nle 'print if @F == 3' 1.txt > 2.txt 

Answer 3

perl -lane 'print if $#F == 2' INFILE 

Answer 4

を：

awk -F'\t' -vCOLS=3 '{ 
    valid=1; 
    for (i=1; i<=COLS; ++i) { 
     if ($i == "") { 
      valid=0; 
      break; 
     } 
    } 
    if (valid) { 
     print; 
    } 
}' input.txt > output.txt 

Answer 5

私は連続したタブを探します、または先頭または末尾のタブ：

perl -ne 'next if /\t\t/ or /^\t/ or /\t$/; print' tabfile 

Answer 6

だけawk 'NF == 3' INFILE > OUTFILEを使用し、それだけでフィールドスプリッタとして空白を（タブ、スペースなど。）を使用します。