如何按部分对文本进行排序并在linux中对部分下的行进行排序？

Question

我有一个像这样的文本配置文件：

config server 'server'
        option url 'https://chef.libremesh.org'

config client 'client'
        option upgrade_packages '1'
        option auto_search '0'
        option advanced_mode '0'

我希望输出是这样的：

config client 'client'
        option advanced_mode '0'
        option auto_search '0'
        option upgrade_packages '1'

config server 'server'
        option url 'https://chef.libremesh.org'

使用哪个命令？

Answer 1

我的 perl 有点生锈了，所以这当然可以变得更干净。试试：

perl -nE 'BEGIN{$/=""}; @b = split "\n", $_; 
    @a = shift @b; push @a, sort @b; 
    push @f, join("\n", @a); END{ say "$_\n" foreach sort @f }' input

将 $/ 设置为空字符串，以便 perl 将每个部分作为记录读取。最初的split 在换行符上拆分每条记录，然后我们通过移出该部分的第一行然后对剩余的行进行排序来构造数组@a。从中构造一个字符串并将其推送到数组@f 上。最后，对各个部分进行排序并写入输出。

你可以通过自动分割来修剪一下：

perl -F'\n' -a -nE 'BEGIN{$/=""}; 
    push @f, join "\n", shift @F, sort @F;
    END{ say "$_\n" foreach sort @f } ' input

或：

perl -00 -F'\n' -a -nE 'push @f, join "\n", shift @F, sort @F} 
    {print join "\n\n", sort @f' input

最后一个命令是一个有点奇怪的习惯用法，它利用了 -n 将命令放在隐式 while(<>){...} 构造中的事实，并且代码中的第一个 } 匹配隐式 { 而“不匹配" { 匹配隐式 }，使其类似于在 END 块中运行最终代码。