salve lista!!!
a tempos eu uso o comando :
perl -i -pe "s/string a substituir/nova string/g" arquivos.*
para fazer substituicoes dentro de um/varios arquivos.
minha duvida seria como fazer a mesma coisa, s� que usando um script perl.
procurei na net e s� achei como fazer isso criando um arquivo temporario e
depois substituindo o original pelo temporario. (justamente o que eu nao
queria..)"
eis o que mais se parece com o que eu achei...
#!/usr/bin/perl
open (IN, "arquivo.txt") || die("nao consigo fazer nada....");
{undef $/;
$alterado = <IN>;
}
close (IN) || die("Erro fechando o arquivio: arquivo.txt $!");
$alterado =~ s/velho texto/novo texto/g;
open (PROD, ">arquivo.txt) || die("Erro excrevendo em arquivo.txt $!");
print PROD $alterado ;
close (PROD) || die("Erro fechando arquivo.txt $!");
}
alguem saberia como fazer isso ?
[]s, julio
---------------------------------------------------------------------------
Esta lista � patrocinada pela Conectiva S.A. Visite http://www.conectiva.com.br
Arquivo: http://bazar2.conectiva.com.br/mailman/listinfo/linux-br
Regras de utiliza��o da lista: http://linux-br.conectiva.com.br
FAQ: http://www.zago.eti.br/menu.html
