Perl DES encryption module