É mais fácil com o AWK veja exemplo abaixo ...

$ printf "Tes Tes1\nTes Tes2" | awk '{IN=substr($0,1,3);
FIM=substr($0,5,8)} {print IN "TXTXTX" FIM}'
TesTXTXTXTes1
TesTXTXTXTes2
Cordialmente,

Marcelo Dias
(Vulgo Bahianeiro)

Em Sáb, 2009-10-03 às 10:08 +0000, [email protected]
escreveu:
> 1. Inclusão de cadeia de caracteres numa posição dentro de um arq
>     Enviado por: "Sérgio Coutinho" [email protected] scoutinhobr
>     Data: Sex, 2 de Out de 2009 8:54 pm
> 
> Caros  amigos,
> 
>  
> 
> Precisei incluir entre o caractere 33 e 34 das linhas de um arquivo,
> uma
> cadeia de caracteres (xXxXxX), para isso utilizei-me do artifício
> abaixo:
> 
>  
> 
> while read LINHA
> 
> do
> 
> echo $LINHA | cut -c1-33 > temp1.txt
> 
> echo $LINHA | cut -c34-  > temp2.txt
> 
> echo "`cat temp1.txt`xXxXxX`cat temp2.txt`" >> arqsai.txt
> 
> done < arq_entrada.txt
> 
>  
> 
> Funcionou, mas não fiquei satisfeito. Acho que pode ser melhorado e em
> muito
> simplificado.
> 
> Alguma sugestão?
> 
>  
> 
>  
> 
> Att.,
> 
> Sérgio Coutinho
> P Antes de imprimir pense em seu compromisso com o Meio Ambiente

Responder a