lệnh để bố trí tab tách biệt danh sách độc đáo

Đôi khi, tôi nhận được như là một danh sách tách biệt tab đầu vào, chẳng hạn như không được căn chỉnh

var1  var2  var3
var_with_long_name_which_ruins_alignment  var2 var3

Có một cách dễ dàng để làm cho chúng phù hợp?

var1                                      var2  var3
var_with_long_name_which_ruins_alignment  var2  var3

Vì vậy, câu trả lời trở thành:

column -t file_name

Lưu ý rằng điều này phân chia các cột ở bất kỳ khoảng trắng nào , không chỉ các tab. Nếu bạn chỉ muốn tách trên các tab, hãy sử dụng:

column -t -s $'\t' -n file_name

Các -s $'\t'bộ dấu phân cách các tab chỉ và -nbảo tồn trống cột (tab liền kề).

PS: Chỉ muốn chỉ ra rằng tín dụng cũng dành cho Alex . Gợi ý ban đầu được ông cung cấp như một bình luận cho câu hỏi, nhưng không bao giờ được đăng dưới dạng câu trả lời.

Đây là một kịch bản để làm điều đó:

aligntabs.pl

#!/usr/bin/perl

my $delim = '\s*\t\s*';

my %length = ();
my @lines = ();
for my $line (<>) {
    chomp $line;
    my @words = split $delim, $line;
    my $numwords = scalar(@words);
    for my $i (0..$numwords-1) {
        my $maxlen = $length{$i} // 0;
        my $thislen = length($words[$i]);
        $maxlen = ($thislen > $maxlen)? $thislen: $maxlen;
        $length{$i} = $maxlen;
    }
    push @lines, [@words];
}

foreach my $wordsref (@lines) {
    my @words = @$wordsref;
    my $numwords = scalar(@words);
    for my $i (0..$numwords-1) {
        if ($i < $numwords-1) {
            my $fieldlen = $length{$i};
            printf "%-${fieldlen}s ", $words[$i];
        }
        else {
            print $words[$i];
        }
    }
    print "\n";
}

sử dụng

$ aligntabs.pl < infile
var1                                     var2 var3
var_with_long_name_which_ruins_alignment var2 var3

Đối với các điểm dừng thủ công: expand -t 42,48

Đối với các điểm dừng tự động, như được đề xuất bởi alex :column -t

( expandcó trên tất cả các hệ thống POSIX. columnLà một tiện ích BSD, cũng có sẵn trong nhiều bản phân phối Linux.)

Theo dõi từ nhận xét của Peter.O, đó là điều tôi muốn căn chỉnh (dữ liệu được phân tách bằng tab, TSV), cụm từ này hoạt động rất độc đáo:

column -t -s $'\t' /Users/me/data.csv | less --chop-long-lines

sed 's/||/| |/g;s/||/| |/g' filename-here | column -s"|" -t | less -#2 -N -S

Giải trình:

Sed sẽ thêm một khoảng trống giữa các dấu phân cách trống

Cột sẽ thêm khoảng cách bằng nhau giữa các cột

zydsld|asl|asd
das|aosdk|dd

trở thành

zydsld|asl  |asd
das   |aosdk|dd 

Ít hơn sẽ mở đầu ra trong một trình xem tập tin. -N và -S sẽ thêm số dòng và vô hiệu hóa gói tương ứng

Với Miller ( http://johnkerl.org/miller/doc ) bạn có đầu ra in đẹp.

Chạy

mlr --inidx --ifs "\t" --opprint cat input | tail -n +2

có

var1                                     var2 var3
var_with_long_name_which_ruins_alignment var2 var3