Я пишу Perl-скрипт , который должен подключаться к SMTP-серверу для отправки почты, но мне очень не нравятся такие вещи:
my $pass = '123456';
И я нашел Данные ::Зашифрованные , которые должны позволить пользователю запросить их в первый раз, а затем сохранить в зашифрованном виде.
use Data::Encrypted file => ".passwd", qw(encrypted);
my $password = encrypted('password');
Но я не могу заставить его работать, возникает ошибка времени выполнения:
Bad key file format at /Library/Perl/5.12/Data/Encrypted.pm line 78
У кого-нибудь есть такая же проблема или кто-нибудь знает другой способ скрыть/защитить пароль?