Como posso dividir a saída com delimitador?

Como posso dividir a saída com delimitador?

Eu gostaria de mudar:

e·ver·y·bo·dy

para:

e·ver·y·bo·dy
e·ver·y·bo·
e·ver·y·
e·ver·

Um forloop será muito preferido.

Responder1

Isso também usa um loop, embora seja um loop forawk :for

$ echo "e·ver·y·bo·dy" | awk -F· -v OFS=· '{print;for (i=NF;i>1;i--){$i="";print;NF--} }'
e·ver·y·bo·dy
e·ver·y·bo·
e·ver·y·
e·ver·

Versão alternativa de curta para longa

$ echo 'e·ver·y·bo·dy' | awk -F· -v OFS=· '{for (i=1;i<=NF;i++){for (j=1;j<=i;j++)printf "%s%s",$j,j<NF?OFS:"";print""} }'
e·ver·
e·ver·y·
e·ver·y·bo·
e·ver·y·bo·dy

Outra variação

$ echo 'e·ver·y·bo·dy' | awk -F· -v OFS=· '{s="";for (i=1;i<=NF;i++){s=s OFS $i; printf "%s",substr(s,2); print (i==NF)?"":OFS} }'
e·ver·
e·ver·y·
e·ver·y·bo·
e·ver·y·bo·dy

Responder2

Você pode fazer isso mais curtocomando como abaixo (longo para pequeno):

$ awk -F'·' '{while (NF){ print $0;NF--;ORS="·\n"}}' OFS='·' file
e·ver·y·bo·dy
e·ver·y·bo·
e·ver·y·
e·ver·

E depequeno a longocomo segue:

$ awk -F'·' '{i=1; while(i<NF){ print tmp=tmp$((i++))"·"} print $0}' file
e·ver·
e·ver·y·
e·ver·y·bo·
e·ver·y·bo·dy

Responder3

Se tiver que ser um forloop:

IFS=·
for l in $(echo "e·ver·y·bo·dy"); do x="$x$l·"; echo "$x"; done | tac

Primeiro temos que definir oseparador de arquivos internopara ·. Em seguida, o loop for percorre cada parte e as imprime, mas na ordem errada. É por isso que tacno final inverte a ordem.

Me dá a saída:

e·ver·y·bo·dy·
e·ver·y·bo·
e·ver·y·
e·ver·

Responder4

Aqui está uma pythonsolução:

#!/usr/bin/env python2
# -*- coding: utf-8 -*-
input_str = 'e·ver·y·bo·dy'
input_list = input_str.split('·')
print input_str
i = len(input_list)
while i > 1:
    print '·'.join(input_list[:i-1]) + '·'
    i -= 1

Aqui, primeiro splitusamos a string de entrada ·como delimitador para gerar uma lista e, em seguida, usamos o fatiamento da lista joinpara obter a saída desejada.

informação relacionada