[SP-pm] RES: Como incluir a opção "delete-before" (Modulo File::Rsync)

[Fabio Adriano Soares]

Flávio,

Você disse que quer apagar os arquivos na origem após a sincronização, porém este comando que você está utilizando apagaria os arquivos no destino antes de iniciar a sincronização.

É isso mesmo?

Neste link você encontra o man do rsync: 
http://www.samba.org/ftp/rsync/rsync.html

Abraço,

Fábio

-----Mensagem original-----
De: <saopaulo-pm-bounces at pm.org>  Em nome de "Flávio R. Lopes"
Enviada em: quarta-feira, 15 de setembro de 2010 16:15
Para: Perl - SP
Assunto: [SP-pm] Como incluir a opção "delete-before" (Modulo File::Rsync)

Pessoal, estou fazendo um programa para sincronizar dados entre servidores.
Estou usando o módulo File::Rsync

O programa funciona, mas agora eu precisarei incluir a opção 
"delete-before" para apagar os arquivos de origem após a transferência, 
porém eu não sei onde (ou como) incluir esta opção no programa.

Pelo que andei lendo, eu acredito que tenho que colocar dentro da 
criação do objeto, mas como é um hash então tenho que ter uma 
chave/valor, como em:

my $obj = File::Rsync->new( { archive => 1, compress => 1, rsh => 
'/usr/bin/ssh', 'rsync-path' => '/usr/bin/rsync' } );

Seria algo parecido com isso?
my $obj = File::Rsync->new( { archive => 1, compress => 1, rsh => 
'/usr/bin/ssh', 'rsync-path' => '/usr/bin/rsync', chave => 
'delete-before' } );

ou

my $obj = File::Rsync->new( { archive => 1, compress => 1, rsh => 
'/usr/bin/ssh', 'rsync-path' => '/usr/bin/rsync', delete-before => 
'valor' } );


Ou teria que incluir na chamada dele?
$obj->exec( { src => 'flavio at servidor:/meu/path', dest => "$destino" } ) 
or warn "rsync failed\n";

abraço,
Flávio

_______________________________________________
SaoPaulo-pm mailing list
SaoPaulo-pm at pm.org
http://mail.pm.org/mailman/listinfo/saopaulo-pm