[SP-pm] Rsync com File::Rsync

[Leandro César]

Pessoal, 



É minha primeira postagem na lista.. e também estou começando em Perl... 


Estou com uma dúvida num script que estou criando em perl.
Esta assim:

my $obj = File::Rsync->new( { archive => 1, compress => 1, rsh =>
"/usr/bin/ssh", 'rsync-path' => '/usr/bin/rsync', 'stats' => 0,} );
$obj->exec( { src => '/root', dest =>
"root\@192.168.0.236:/home/usuario/teste" } )or warn "A transferencia
falhou!\n";

 

Também tentei colocar o src com dois diretórios e não funcionou... ficou
assim:

$obj->exec( { src => '/root /etc', dest =>
"root\@192.168.0.236:/home/usuario/teste" } )or warn "A transferencia
falhou!\n";

 

É possível fazer isso declarando uma variável.?

Como estou iniciando em Perl, gostaria de saber como tratar o erro para
posteriormente enviar um e-mail...
Se o rsync falhar eu já tenho a mensagem "A transferencia falhou!", mas
quando o rsync roda com sucesso não tenho status...

Se alguem pudar dar uma ajuda ou uma luz agradeço...

Att,
Leandro César

Atenciosamente,

 

leandro

 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20110415/977778f2/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: image/jpeg
Size: 9862 bytes
Desc: not available
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20110415/977778f2/attachment-0001.jpe>