AWK-列の範囲を出力します

$ awk -v b=2 -v e=7 "BEGIN{FS=OFS=","} {for (i=b;i<=e;i++) printf "%s%s", $i, (i<e ? OFS : ORS)}" file column2,column3,column4,column5,column6,column7 

b =開始フィールド番号、e =終了フィールド番号。引用符で囲まれたフィールド、埋め込みカンマ、改行などを含むCSVを処理する必要がある場合は、 https://stackoverflow.com/q/45420535/1745001 を参照してください。

ユーティリティカットの表記はコンパクトです：

cut -d, -f2-7 <input-file> 

プロデュース：

column2、column3、column4、column5、column6、column7

@PlasmaBinturongによるコメントへの回答：私の意図は、短い呼び出しシーケンスの問題に対処することでした：" …私のawkコマンドはひどく長くなります… "。ただし、必要に応じてフィールドを配置するコードを見つけることもできます。私はawk、perl、pythonが好きですが、標準の* nixの機能を拡張するための特定のユーティリティを構築することが役立つことがよくあります。したがって、これはテストスクリプトs2からの抜粋であり、ユーティリティの再カットとアレンジを示しています。どちらも再アレンジと複製が可能で、アレンジではフィールド範囲の縮小も可能です。

FILE=${1-data1} # Utility functions: print-as-echo, print-line-with-visual-space. pe() { for _i;do printf "%s" "$_i";done; printf "\n"; } pl() { pe;pe "-----" ;pe "$*"; } pl " Input data file $FILE:" head $FILE pl " Results, cut:" cut -d, -f2-7 $FILE pl " Results, recut (modified as my-recut):" my-recut -d "," 7,6,2-5 < $FILE pl " Results, arrange:" arrange -s "," -f 5,3-1,7,5,3-4,5 $FILE 

これらのバージョンから結果を生成する：

OS, ker|rel, machine: Linux, 3.16.0-10-amd64, x86_64 Distribution : Debian 8.11 (jessie) bash GNU bash 4.3.30 cut (GNU coreutils) 8.23 recut - ( local: RepRev 1.1, ~/bin/recut, 2010-06-10 ) arrange (local) 1.15 ----- Input data file data1: column1,column2,column3,column4,column5,column6,column7,column8 ----- Results, cut: column2,column3,column4,column5,column6,column7 ----- Results, recut (modified as my-recut): column7,column6,column2,column3,column4,column5 ----- Results, arrange: column5,column3,column2,column1,column7,column5,column3,column4,column5 

my-recutは、textutilsコードの再カットをわずかに変更したものであり、arrangeは拡張カットのバージョンです。 。詳細：

recut Process fields like cut, allow repetitions and re-ordering. (what) Path : ~/bin/recut Version : - ( local: RepRev 1.1, ~/bin/recut, 2010-06-10 ) Length : 56 lines Type : Perl script, ASCII text executable Shebang : #!/usr/bin/perl Home : http://www1.cuni.cz/~obo/textutils/ (doc) Modules : (for perl codes) Getopt::Long 2.42 arrange Arrange fields, like cut, but in user-specified order. (what) Path : ~/bin/arrange Version : 1.15 Length : 355 lines Type : Perl script, ASCII text executable Shebang : #!/usr/bin/perl Modules : (for perl codes) warnings 1.23 strict 1.08 Carp 1.3301 Getopt::Euclid 0.4.5 

よろしくお願いします…乾杯、drl

コメント

• Awkとは対照的に、コマンドの順序ではなく、入力ファイルの順序で列を出力します。
• @ PlasmaBinturong-編集された回答を参照…乾杯

sed -e " s/,/\n/7 ;# tag the end of col7 s/^/,/ ;# add a comma s/,/\n/2 ;# tag beginning of col2 s/.*\n\(.*\)\n.*/\1/ ;# perform surgery " file.csv 

結果：

column2,column3,column4,column5,column6,column7 

以下のコマンドでテストし、正常に動作しました

awk -F "," "OFS=","{$1="";$NF="";print $0}" o| sed "s/^,//g"|sed "s/,$//g" 

出力

column2,column3,column4,column5,column6,column7 

コメント

• 回答ありがとうございます。" o "最初のsedパイプの前:-) 2つのsedコマンドを1つに連結できます：sed "s/^,//g; s/,$//g"