如何在Unix中提取多行单词？

perl -lane \'$el=$F[3] if(/Exported Layer/); print \"$el: $F[3]\" if(/Total Polygons/);\'

use strict;
use warnings;

my $layer;
my $polys;

while (<>) {
    if ($_ =~ m{^Exported \\s Layer \\s : \\s (\\S+)}xms) {
        $layer = $1;
        next;
    }
    if ($_ =~ m{^Total \\s Polygons \\s : \\s (\\d+)}xms) {
        $polys = $1;
    }
    if (defined $layer && defined $polys) {
        print \"$layer : $polys\\n\";
        $layer = $polys = undef;
    }
}

awk

awk -F: \'/Exported Layer/ { export_layer = $2 }
         /Total Polygons/ { printf(\"%s : %s\\n\", export_layer, $2); }\' \"$@\"

sed

sed -n -e \'/Exported Layer : *\\(.*\\)/{s//\\1 : /;h;}\' \\
       -e \'/Total Polygons : *\\(.*\\)/{s//\\1/;x;G;s/\\n//;p;}\' \"$@\"

sed