Re: [shell-script] Deixar apenas a primeira linha de cada bloco.

[jimmy]

On Mon, Nov 23, 2009 at 10:19:59AM -0800, Walber Santos wrote:
> 
> 
>    Boa tarde pessoal,
> 
>    Esse é o meu primeiro email para a lista, apesar de acompanhar ela há
>    algum tempo.
> 
>    Preciso de uma ajuda para deletar o seguinte conteudo:
> 
>    Possu essa lista
> 
>    var/vmail/dominio/j/o/joao.ranzani/
>    var/vmail/dominio/j/o/joao.ranzani/Maildir/
>    var/vmail/dominio/j/o/joao.ranzani/Maildir/cur/
>    var/vmail/dominio/j/o/joao.ranzani/Maildir/new/
>    var/vmail/dominio/j/o/joao.ranzani/Maildir/tmp/
>    var/vmail/dominio/j/o/joao.ranzani/lastauth
> 
> 
>    var/vmail/dominio/j/o/joao.rodrigues/
>    var/vmail/dominio/j/o/joao.rodrigues/Maildir/
>    var/vmail/dominio/j/o/joao.rodrigues/Maildir/cur/
>    var/vmail/dominio/j/o/joao.rodrigues/Maildir/new/
>    var/vmail/dominio/j/o/joao.rodrigues/Maildir/tmp/
>    var/vmail/dominio/j/o/joao.rodrigues/lastauth
> 
>    Preciso apagar esses maildir, porém para facilitar gostaria de trazer
>    apenas a primeira linha.
> 
>    exemplo:
> 
>    var/vmail/dominio/j/o/joao.ranzani/
> 
>    ou
> 
>    var/vmail/dominio/j/o/joao.rodrigues/
> 
>    Se alguém tiver uma dica.
> 
>    Agradeço desde já.
> 
>    __________________________________________________________


assumindo que os blocos são separados por linhas em branco, talvez estas
opções lhe sirvam:
  
  $ awk 'NR==1{print}; !NF{while(!NF)getline; print}' arquivo

ou

  $ sed '1p;/^$/{:loop;N;/\n$/loop; s/.*\n//;p};d' arquivo


-- 
"Não manejo bem as palavras
Mas manipulo bem as strings."
------------------------------