[SP-pm] Cópia de arquivos
Luis Motta Campos
luismottacampos em yahoo.co.uk
Quarta Maio 23 05:59:19 PDT 2007
Diogo, alguma vez na vida você escutou falar do rsync?
Eu tenho a impressão de que o seu problema poderia ser resolvido
de uma maneira muito mais simples e fácil com o rsync... dá uma
perguntada para o Bibliotecário Bêbado sobre isso...
Putamplexos!
On May 23, 2007, at 12:58 PM, Diogo Rocha Bezerra wrote:
> Caros,
> Bom dia!
>
> Necessito várias vezes durante o dia, fazer cópia de arquivos de
> log (texto simples)que se encontram em vários servidores.
> Segue abaixo um esboço do que estou tentando automatizar..
>
> #carrega lista de servidores e ip
> $servidor = $dbh->prepare("SELECT nom_servidor,ip_servidor from
> servidores where cod_servidor = 1") or die "$DBI::errstr\n";
> $servidor->execute() or die "$DBI::errstr\n";
>
> # efetua cópia dos log´s para a estação
>
> while(my $result = $servidor->fetchrow_hashref())
> {
> $ip_server = $result->{ip_servidor};
> $ip_server =~ s/ //gi;
> $server = $result->{nom_servidor};
> $server =~ s/ //gi;
>
> #mapeia unidade de rede
> print "Conectando-se ao ".$server."\n";
> system("NET USE X: \\\\".$server. "\\compartilhamento\\LOG /
> USER:AAAAA BBBBB");
>
> #cria diretório se não existir
> system("IF NOT EXIST ".$dir_sistema."\\temp\\".$server." (MKDIR ".
> $dir_sistema."\\temp\\".$server.")");
>
> #copia log
> print "Copiando ".$nom_log_proc."\n";
> system("copy x:\\".$nom_log_proc." ".$dir_sistema."\\temp\\".
> $server."\\ /Y");
>
> print "\n";
>
> #deleta unidade de rede
> system("NET USE X: /D");
>
> }
>
> Porém como o arquivo a ser copiado é muito grande +- 3,5Mb, quando
> realizo a cópia ele fica bloqueado para edição impedindo que sejam
> inseridas novas informações no log.
>
> Existe alguma forma de codificar, sem usar o Sistema Operacional,
> que eu consiga realizar essa cópia sem bloquear o arquivo?
>
> Desde já agradeço a atenção de todos.
>
> Diogo Rocha Bezerra
> Operações - Suporte SIV
> HBSIS Informática Ltda - CMMI
> ' (47) 2123-5845
> diogo em hbsis.com.br
> www.hbsis.com.br
> msn: op3drb
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
--
Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer,
Perl fanatic evangelist, and amateur {cook, photographer}
Mais detalhes sobre a lista de discussão SaoPaulo-pm