title: How could I hide/protect password from a Perl script
body: <p>I'm writing a <strong>Perl script</strong> that needs to connect to a <strong>SMTP server</strong> in order to send a mail, but I really don't like this kind of things :</p>
  
  <pre><code>my $pass = '123456';
  </code></pre>
  
  <p>And I found <strong>Data::Encrypted</strong>, that should allow the user to prompt it the first time and then store it encrypted.</p>
  
  <pre><code>use Data::Encrypted file =&gt; ".passwd", qw(encrypted);
  my $password = encrypted('password');
  </code></pre>
  
  <p>But I cannot make it work, it makes a running time error :</p>
  
  <blockquote>
    <p>Bad key file format at /Library/Perl/5.12/Data/Encrypted.pm line 78</p>
  </blockquote>
  
  <p>Is anybody having the same issue, or know another way to hide/protect password?</p>