Как я могу скрыть/защитить пароль от Perl-скрипта

Я пишу 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

У кого-нибудь есть такая же проблема или кто-нибудь знает другой способ скрыть/защитить пароль?

7
задан Sarah Aziziyan 13 September 2017 в 13:23
поделиться