將行轉換為Bash中的列

Question

我已經在互聯網上拖網捕撈了如何去做我想做的事，但是徒勞無功。 我需要轉置下面的數據...。

Caption=C:
Description=Local Fixed Disk
DriveType=3
FreeSpace=41265664000
ProviderName=
Size=146056146944
VolumeName=
Caption=D:
Description=Local Fixed Disk
DriveType=3
FreeSpace=125067259904
ProviderName=
Size=1073738674176
VolumeName=Data
Caption=E:
Description=Removable Disk
DriveType=2
FreeSpace=
ProviderName=
Size=
VolumeName=

像這樣的表格布局...

Caption   Description        DriveType   FreeSpace     ProviderName   Size            VolumeName 
C:        Local Fixed Disk   3           41265664000                  146056146944     
D:        Local Fixed Disk   3           125067259904                 1073738674176   Data 
E:        Removable Disk     2   

bash 。 我一直在探索各種awk腳本，但是我似乎不太了解它們背​​后的邏輯：|

任何幫助，將不勝感激。 謝謝！

Answer 1

與gawk ：

awk -v RS="Caption" -F"[=\n\"]" '
    NR==2{
        printf RS;
        for(i=3;i<=NF;i+=2){
            printf ":"$i
        };
        print ""
    };
    {
    for(i=2;i<=NF;i+=2){
        if ($i != "" ) printf ":"$i;
        else printf ": "
    };
    print ""}'  file | column -s":" -t

Answer 2

您可以使用其他工具來執行此操作，例如Perl或python 。

例如，在Perl中，您可以使用以下命令：

#!/usr/bin/perl -n
use Text::ASCIITable;

next unless /^(\w+)\s*=\s*(.*)$/;
$data{$1} = [] if not $data{$1};
push $data{$1}, $2;

END {
    $t = Text::ASCIITable->new();
    $t->setCols(keys %data);

    for my $i (0..@{$data{(keys %data)[0]}} - 1) {
        $t->addRow(map $data{$_}[$i], keys %data)
    }
    print $t;
}

您的數據可以在data.txt因此您可以編寫：

$ ./myscript.pl data.txt
.---------------------------------------------------------------------------------------------------.
| Caption | Size          | DriveType | VolumeName | FreeSpace    | Description      | ProviderName |
+---------+---------------+-----------+------------+--------------+------------------+--------------+
| C:      |  146056146944 |         3 |            |  41265664000 | Local Fixed Disk |              |
| D:      | 1073738674176 |         3 | Data       | 125067259904 | Local Fixed Disk |              |
| E:      |               |         2 |            |              | Removable Disk   |              |
'---------+---------------+-----------+------------+--------------+------------------+--------------'

對於以任意順序給出的N個列，此腳本是通用的。 但是，如果知道這些列並始終以相同的順序顯示它們，則可以將代碼簡化為：

#!/usr/bin/perl -n
use Text::ASCIITable;

BEGIN {
    @columns = qw/Caption Description DriveType FreeSpace ProviderName Size VolumeName/;
    $t = Text::ASCIITable->new();
    $t->setCols(@columns);
    $re = join "\n", map "$_=(?<$_>.*)", @columns;
    undef $/;
}

$t->addRow(map $+{$_}, @columns) while(/$re/g);

END { print $t; }

甚至可以使用Python：

#!/usr/bin/python
import sys
from terminaltables import AsciiTable
table_data = []
for row in ["Caption" + d for d in sys.stdin.read().split("Caption")[1:]]:
    table_data.append([column.split('=')[1] for column in row.split("\n")[:-1]])
    columns = [column.split('=')[0] for column in row.split("\n")[:-1]]

table_data.insert(0, columns)
print AsciiTable(table_data).table

Answer 3

$ cat tst.awk
BEGIN { FS=OFS="=" }
{ hdr = hdr sep $1; data = data sep $2; sep=OFS }
$1=="VolumeName" { if (!c++) print hdr; print data; data=sep="" }

$ awk -f tst.awk file | column -s= -t
Caption  Description       DriveType  FreeSpace     ProviderName  Size           VolumeName
C:       Local Fixed Disk  3          41265664000                 146056146944
D:       Local Fixed Disk  3          125067259904                1073738674176  Data
E:       Removable Disk    2