[SP-pm] Ocultar senhas dentro de Scripts Perl

["Flávio R. Lopes"]

Boa tarde pessoal.

Estou fazendo um script para enviar periodicamente uns arquivos via ftp 
de um server para outro.
No CPAN achei o módulo Net::FTP e estou usando ele.

Na parte que trata do login, eu criei um scalar para armazenar a senha 
do meu usuario no servidor FTP.
Supondo:

my $login = "flavio";
my $senha = "minha_senha";


     $ftp->login($login,$senha)
       or die "Cannot login ", $ftp->message;

Como posso ocultar esta senha ?

abraço,
Flávio