紧急求助！字符串的加密问题

zhouyj1982

请问高手们，相对字符串进行加密、解密的处理，又没有什么比较好的模块可以用，现有的crypt和知道的MD5都是不可逆的，需要一个可逆的，谢谢！

紧急紧急！

apile

用pack/unpack吧..

zhouyj1982

要命，看了网上关于pack/unpack的介绍，不太明白！

我这里是要对密码作处理，要求密码丢失要能取回原密码，原来是用md5作的加密处理，但是不能逆向取回密码。

谢谢楼上的，我再好好看看

rorot

你用DES吧.

1. 
   
2. #!/usr/bin/perl -w
   
3. 
   
4. use strict;
   
5. use Crypt::CBC;
   
6. 
   
7. my $mypasswd = 'mypasswd';
   
8. my $text = 'text to be encrypted';
   
9. 
   
10. my $cipher = Crypt::CBC->;new(
    
11.                                                           -key =>; $mypasswd,
    
12.                                                           -salt=>; 1
    
13.                                                         );
    
14. 
    
15. my $encrypted_text = unpack("H*", $cipher->;encrypt($text));
    
16. 
    
17. my $decrypted_text = $cipher->;decrypt(pack("H*", $encrypted_text));
    
18. 
    
19. print "$text\n$encrypted_text\n$decrypted_text\n";
    

复制代码

1. 
   
2. text to be encrypted
   
3. 53616c7465645f5fe9d3ff980f4bd6b11a59a92e0eb55eefbabdb84e820171139a6c89ba2a4de954
   
4. text to be encrypted
   

复制代码

hcduguo

我之行的时候把相关的pm文件全部放在c:\perl\lib下面，但是执行程序的时候老是报错，说找不到pm文件！

D:\search\getinfo\analysis\parsing>cypt.pl
Couldn't load Crypt:ES: Can't locate loadable object for module Crypt:ES in
@INC (@INC contains: C:/Perl/lib C:/Perl/site/lib .) at (eval 2) line 1
Compilation failed in require at (eval 2) line 1.
at D:\search\getinfo\analysis\parsing\cypt.pl line 9

hcduguo

D:\search\getinfo\analysis\parsing>cypt.pl
Couldn't load Crypt：：DES: Can't locate loadable object for module Crypt：：DES in
@INC (@INC contains: C:/Perl/lib C:/Perl/site/lib .) at (eval 2) line 1
Compilation failed in require at (eval 2) line 1.
at D:\search\getinfo\analysis\parsing\cypt.pl line 9

hcduguo

Pls do me a favor!

flw

原帖由 hcduguo 于 2007-7-31 17:26 发表
我之行的时候把相关的pm文件全部放在c:\perl\lib下面，但是执行程序的时候老是报错，说找不到pm文件！

D:\search\getinfo\analysis\parsing>cypt.pl
Couldn't load Crypt:ES: Can't locate loadable obje ...

要安装……
不是光把 .pm 拷过去就行了的……

hcduguo

哪儿有参考资料
我看有些资料里面用make安装，但是在windows中没有make 命令啊！

bilbo0214

原帖由 hcduguo 于 2007-8-1 11:46 发表
哪儿有参考资料
我看有些资料里面用make安装，但是在windows中没有make 命令啊！

从MS的网站上下一个nmake不就行了。