Grande Godoy,
Em Mon, 24 Feb 2003 15:58:36 -0300, Jorge Godoy <[EMAIL PROTECTED]>
escreveu:
> Marcio Merlone <[EMAIL PROTECTED]> writes:
> > Preciso numerar todas os finais linhas de um arquivo. Vi uma vez um
> > exemplo disto com o vi mas n�o lembro onde nem como. Basicamente:
> >
> > /^Received: (baby|clobberer) \(/ REJECT
> > /^Received:.*cyber/ REJECT
> >
> > preciso transformar em
> >
> > /^Received: (baby|clobberer) \(/ REJECT (Cod. 1)
> > /^Received:.*cyber/ REJECT (Cod. 2)
(...)
> Perl:
(...)
> if (($linha != /^$/) or ($linha != /^#/)) {
> $linha =~ s/$/ (Cod. $i)/;
> $i++;
> }
Vamos ver se estou fazendo a li��o de casa. Aqui n�o daria para usar, ou
ficaria melhor utilizar
unless (($linha == /^$/) or ($linha == /^#/)) {
$linha =~ s/$/ (Cod. $i)/;
$i++;
}
,de forma a ficar mais claro?
(...)
> Eu poderia ter feito a mudan�a inline, tamb�m ou diretamente da linha
> de comandos, mas ficaria menos clara.
O que vem a ser "inline"? Acho que gostei disto.
Bem, o que vc mandou resolve o problema, mas n�o mata a sede pelo
conhecimento (Uau!). Estou ainda curioso de como faria
isto com o vi em uma �nica linha de comando...
--
Marcio Merlone
Assinantes em 24/02/2003: 2229
Mensagens recebidas desde 07/01/1999: 202361
Historico e [des]cadastramento: http://linux-br.conectiva.com.br
Assuntos administrativos e problemas com a lista:
mailto:[EMAIL PROTECTED]
