Senhores,

Preciso de uma ajuda com perl. Sei que tenho como executar a linha

perl -e 's/MX[ \t]10/MX 20/g' -i.bak -p named.dominio.com.br

para alterar o texto "MX 10" do arquivo de zona de DNS para o
dominio.com.br para "MX 20".

Por�m, eu tenho aproximadamente 2500 arquivos de zona com os valores de
MX mais despadronizados poss�veis. Como faria no perl para padronizar os
MX em valores m�ltiplos de 10?

Por exemplo:

        IN      MX 5    foo
        IN      MX 13   bar
        IN      MX 48   zee

transformar em

        IN      MX 20   foo
        IN      MX 30   bar
        IN      MX 40   zee

e ainda depois disto, adicionar um MX 10 bat onde o MX prim�rio (MX 20
depois de alterado como acima) mas somente quando o MX 20 for um entre
"foo, dev ou bla", ficando

        IN      MX 10   bat
        IN      MX 20   foo
        IN      MX 30   bar
        IN      MX 40   zee

se, e refor�ando somente se, o MX PRIM�RIO for um entre "foo, dev ou
bla", ignorando esta adi��o nos outros casos.

Aproveitando, se algu�m tiver algum bom tutorial de perl, url ou
qualquer dica, manda, por favor! Quero jogar awk, sed, grep e cia ltda
na gaveta. :)

Obrigado.


--

    Marcio Merlone


Assinantes em 05/02/2003: 2243
Mensagens recebidas desde 07/01/1999: 200125
Historico e [des]cadastramento: http://linux-br.conectiva.com.br
Assuntos administrativos e problemas com a lista:
            mailto:[EMAIL PROTECTED]

Responder a