Como transformar o resultado do awk em lista? [RESOLVIDO]

1. Como transformar o resultado do awk em lista? [RESOLVIDO]

theThux
(usa Debian)

Enviado em 01/04/2017 - 16:06h

Bom meus amigos, tenho a seguinte dúvida, mas primeiro vou lhes falar o que tenho em mãos.

Tenho um script em que uso o awk, ($1), tendo em vista de que ele vai pegar o 1° fileira do arquivo, quero transformar essas informações em "lista".
Exemplo:

Arquivo: /root/arq.txt

Michel
Darlan
Oliveira
Silva

awk '{print $1}' /root/arq

Irá retornar todos os nomes certo? Mas como faço para que ele retorne assim:

Michel, Darlan, Oliveira, Silva ...??

Grato

- Caso não tenha entendido, é só perguntar a parte que não entendeu que eu tentarei explicar melhor.

0 0

Quote

2. MELHOR RESPOSTA

zenull
(usa Outra)

Enviado em 01/04/2017 - 16:34h

lipinho0 escreveu:

Bom meus amigos, tenho a seguinte dúvida, mas primeiro vou lhes falar o que tenho em mãos.

Tenho um script em que uso o awk, ($1), tendo em vista de que ele vai pegar o 1° fileira do arquivo, quero transformar essas informações em "lista".
Exemplo:

Arquivo: /root/arq.txt

Michel
Darlan
Oliveira
Silva

awk '{print $1}' /root/arq

Irá retornar todos os nomes certo? Mas como faço para que ele retorne assim:

Michel, Darlan, Oliveira, Silva ...??

Grato

- Caso não tenha entendido, é só perguntar a parte que não entendeu que eu tentarei explicar melhor.

Usando apenas awk deve ter um jeito simples, mas não sei (nem tentei) como fazer. Mas dá pra fazer usando o sed:

sed 's/$/texto incluido/' --- inclui texto no final de cada linha.
sed ':a;$!N;s/\n//;ta;' --- coloca todas as linhas em uma só.

Ficaria assim:

awk '{print $1}' /root/arq | sed 's/$/, /' | sed ':a;$!N;s/\n//;ta;'

0 0

Quote

3. Re: Como transformar o resultado do awk em lista? [RESOLVIDO]

msoliver
(usa Debian)

Enviado em 01/04/2017 - 16:49h

Boa tarde lipinho.
Segue sugestão:
awk '$0 != "" {ORS=", ";print $0}' nomes |sed 's/, $/\n/'
Explicando:
Se $0 é diferente de "vazio" print $0
ORS = Troca o separador de registro que anteriormente era "\n" por ", "
sed 's/, $/\n/' = Troca a ultima ", " por "\n"

Outra opção:
cat nomes |xargs|sed 's/ /, /g'

É isso:

Se a dúvida foi esclarecida, marque o tópico como resolvido . . .
Se minha resposta foi satisfatória e esclarecedora . . . MARQUE-A como a MELHOR . . .
Dessa forma sou pontuado, o que incentiva a continuar compartilhando o conhecimento....

att.:
marcelo oliver

0 0

Quote