Retirar determinados objetos de um banco de dados de arquivos simples

1

Eu tenho um banco de dados de arquivos simples e preciso remover certos objetos dele.

Existem vários blocos no arquivo, mas estou interessado em dois objetos no bloco OBJECT NickCore .

Exemplo abaixo:

OBJECT NickCore
DATA display SomeUser
DATA pass sha256:2b35341220119fad48762e4f843d1544354f8b196cf09bf1b4ea39f9a31be063:5ff60fae76026907102419460aae83aa74daf374048940b612ef83460043b565
DATA email [email protected]
DATA language
DATA access SomeUsero@*.5A5E5CBA.81D21A52.IP
DATA memomax 20
DATA MEMO_SIGNON 1
DATA MEMO_RECEIVE 1
DATA HIDE_EMAIL 1
DATA HIDE_MASK 1
DATA NS_PRIVATE 1
DATA AUTOOP 1
DATA KILLPROTECT 1
DATA NS_SECURE 1
END

Eu quero remover o DATA display e DATA pass de cada OBJECT NickCore no arquivo.

A saída desejada seria apenas separada por vírgulas:

SomeUser,sha256:2b35341220119fad48762e4f843d1544354f8b196cf09bf1b4ea39f9a31be063:5ff60fae76026907102419460aae83aa74daf374048940b612ef83460043b565

O que devo usar para fazer isso?

    
por user5603796 13.02.2016 / 16:36

2 respostas

2

Com o GNU sed:

sed -n '/^OBJECT NickCore/,/^END/{s/^DATA display //;Ta;h;:a;s/DATA pass //;Tb;H;g;s/\n/,/p;:b}' file

Veja: man sed

    
por 13.02.2016 / 17:06
0

perl 1-liner:

perl -lne '$u=$1 if(/^DATA display (\S+)/);print "$u,$1" if(/^DATA pass (\S+)/)' filename
    
por 13.02.2016 / 22:49