new pattern requerido de um arquivo de entrada usando sed ou awk

2

Eu tenho dados como abaixo:

MGW: VMG110
836-16
836-18
836-19
336-20
836-23
MGW: VMG120
3802-1
3802-2
3802-3
3456-1
3456-4

A saída exigida é:

VMG110:836-16&-18&&-20&-23
VMG120:3802-1&&-3&3456-1&-4

em dados dados -1, -2, -3, -4 estão sempre de maneira ordenada

na saída -19 está ausente ... em vez de -18 & -20 está presente..onde & & significa 18 a 20 .. por favor, forneça o mesmo.

    
por user73553 30.06.2014 / 11:29

2 respostas

1

Solução Perl. A primeira linha de saída é diferente da sua (faltando - após & na saída requerida?).

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

my $first = 1;
my @line;

sub output {
    print join('&', @line), "\n" unless $first;
}


my $previous = q();
while (<>) {
    chomp;
    if (s/.*: //) {
        output();
        print "$_:";
        $previous = q();
        @line = ();

    } else {
        my ($prefix, $suffix) = split /-/;
        if ($prefix ne $previous) {
            push @line, "$prefix-$suffix";
        } else {
            push @line, "-$suffix";
        }
        $previous = $prefix;
    }
    undef $first;
}
output(); # Don't forget to output the last line.
    
por 30.06.2014 / 11:47
0
awk -F '-|: ' '
    function printit(  sep,key) {
        sep = ""
        for (key in data) {
            printf "%s%s", sep, data[key]
            sep = "&"
        }
        print ""
        delete data
    }
    $1 == "MGW" {
        if (key1) printit()
        key1 = $2
        printf "%s:", key1
        next
    }
    !data[key1,$1] {
        data[key1,$1] = $0
        next
    }
    {data[key1,$1] = data[key1,$1] "&-" $2}
    END {printit()}
' file
VMG110:836-19&-23
VMG120:3802-1&-2&-3&3456-1&-2
VMG119:3248-1&-2&3802-8&-9&-10&-11&-12&-13&3457-18&-19&-20
    
por 30.06.2014 / 13:07

Tags