2番目の列を指定された長さに切り捨てる方法

フォームの指定された入力

XY981743    foobarlkasdf saflkas asfZR!sgfad asdSAD asdsadf SAdfasdf46lk lksad bar foolkasjfdrte

2番目の列のみを切り捨てるにはどうすればよいですか？区切り文字はTABで、2番目の列は最大75文字である必要があります。

2番目の列の最初の75文字（スペースを含み、ファイル内の列が2つだけであると想定）だけを印刷する場合は、次のようにします。

$ perl -pe 's/(\t.{75}).*/$1/' file
XY981743    foobarlkasdf saflkas asfZR!sgfad asdSAD asdsadf SAdfasdf46lk lksad bar fool

または、GNUの場合sed：

$ sed 's/\(.*\t.\{75\}\).*/\1/' file
XY981743    foobarlkasdf saflkas asfZR!sgfad asdSAD asdsadf SAdfasdf46lk lksad bar fool

または：

$ sed -r 's/(.*\t.{75}).*/\1/' file
XY981743    foobarlkasdf saflkas asfZR!sgfad asdSAD asdsadf SAdfasdf46lk lksad bar fool

または、を使用foldして、最初の91文字（識別子は8文字、タブは8文字）でカットするように指示し、最初の行のみを印刷することもできます。

$ fold -w 91 file | head -n1
XY981743    foobarlkasdf saflkas asfZR!sgfad asdSAD asdsadf SAdfasdf46lk lksad bar fool

ファイルに2列を超える列を含めることができ、2番目の列のみを切り捨てたい場合は、これを行うことができます（これは、先ほど気付いたように、Stephenの答えの言い換えにすぎません）。

$ awk -F"\t" -vOFS="\t" '{$2=substr($2,1,75)}1;' file
XY981743    foobarlkasdf saflkas asfZR!sgfad asdSAD asdsadf SAdfasdf46lk lksad bar fool

または（2番目の列の最初の75文字が正規表現として解釈できる場合、これは壊れることに注意してください）：

$ perl -F"\t" -pale 's/$F[1]/substr($F[1],0,75)/e' file
XY981743    foobarlkasdf saflkas asfZR!sgfad asdSAD asdsadf SAdfasdf46lk lksad bar fool

を使用してawk、タブを使用してファイルを分割し、最初のフィールドを完全に出力し、2番目のフィールドの最初の75文字（最大で）を出力します。

awk -F "\t" 'BEGIN { OFS=FS }; { print $1, substr($2, 1, 75); }'

fedorquiで指摘されているように、切り捨てる必要のあるフィールドを置き換えることにより、3つ以上のフィールドを持つファイルを処理できます。

awk -F "\t" 'BEGIN { OFS=FS }; { $2=substr($2, 1, 75); print }'

substr必要に応じて、ループして複数のフィールドに適用できます。

移植可能/ POSIXly sed：

tab=$(printf '\t')
sed "s/\($tab[^$tab]\{0,75\}\)[^$tab]*/\1/"

または、すべての列を切り捨てます：

sed "s/\([^$tab]\{75\}\)[^$tab]*/\1/g"

列が2つしかない場合：

sed -r 's/^([^\t]*\t)(.{0,75}).*/\1\2/'

{0,75}0から75文字までを選択することを意味します。
.* char 75以降の削除されたセクションです。

列が2 つ以上ある場合：

sed -r 's/^([^\t]*\t)([^\t]{0,75})[^\t]*(.*)/\1\2\3/' file

[^\t]* char 75以降の削除されたセクションです。