对文本进行排序（unix/shell）

Question

我有一些数据集（foo），其中bar和baz作为部分输出。 baz的部分应排序为输出的顶部。

示例输入;

= foo4 = 
bar 
(..) 
barN 
= foo1 = 
bar 
(..) 
barN 
= foo5 = 
bar 
(..) 
barN 
baz 
= foo2 = 
bar 
(..) 
barN 
= foo3 = 
bar 
(..) 
barN 
baz 

在上面的例子中，我想部= foo3 =和= foo5 =被移动到输出的顶部，并具有列表中部分“名”的子分类，即。

= foo3 = 
= foo5 = 
= foo1 = 
= foo2 = 
= foo4 = 

但与该部分的内容完好无损。

Answer 1

Perl解决方案。它使用段的散列，键是段的名称，值包含段开始的文件中的位置以及是否存在baz的信息。一旦将文件读入散列，就会对键进行排序并打印内容，并在记忆中移动文件。

#!/usr/bin/perl 
use warnings; 
use strict; 

my $file = shift; 

my $start = qr/^= (.*) =$/; 

open my $FH, '<', $file or die $!; 

my %sections; 
my $current_section; 
while (<$FH>) { 
    if (/$start/) { 
     $current_section = $1; 
     $sections{$current_section}{begin} = tell $FH; 
    } elsif (/baz/) { 
     $sections{$current_section}{baz} = 1; 
    } 
} 

for my $section (map substr($_, 1), 
       sort map { ($sections{$_}{baz} ? '0' : '1') . $_ } 
       keys %sections) { 
    seek $FH, $sections{$section}{begin}, 0; 
    print "= $section =\n"; 
    while (<$FH>) { 
     last if /$start/; 
     print; 
    } 
} 

Answer 2

Lottastuff的解决方案，也叫做脂肪oneliner：

awk '/^=/{print ""} {printf "%s\t", $0}' input.txt | \ 
    awk '{print ($NF != "baz")"\t"$0}' | sort -n | cut -f 2- | \ 
    tr '\t' '\n' | sed -e '/^$/d' 

初始转化织补太挑剔。应该有一些工具能够粘贴线，直到分隔符（：