求教perl的zlib问题

huhuegg

与flash的压缩内容对不上，求教~~
据说flash的与c/c++的对得上，
可是perl flash c应该用的都是zlib啊，为啥呢？

perl

1. #!/usr/bin/perl
   
2. use strict;
   
3. use encoding "utf-8";
   
4. use Compress::Zlib;
   
5. use Digest::MD5 qw(md5 md5_hex md5_base64);
   
6. 
   
7. my $str = "1111ABCDEFGHIJKLMNOPQRSTUVWXY";
   
8. 
   
9. 
   
10. 
    
11. print "str:\t\t$str\n";
    
12. print "str_md5:\t",md5_hex($str),"\n";
    
13. 
    
14. 
    
15. my $compress_str;
    
16. $compress_str  = compress($str);
    
17. print "compress_md5:\t",md5_hex($compress_str),"\n";

复制代码

结果

1. str:            1111ABCDEFGHIJKLMNOPQRSTUVWXY
   
2. str_md5:        2d9552203f69477379cd5a5e32719df8
   
3. compress_md5:5d981d14856526bb4ab9d84755e12891

复制代码

AS3

1. package
   
2. {
   
3.         import com.adobe.crypto.MD5;
   
4. 
   
5.         import flash.display.Sprite;
   
6.         import flash.utils.ByteArray;
   
7.         import flash.utils.CompressionAlgorithm;
   
8.         
   
9.         public class just_test extends Sprite
   
10.         {
    
11.                 public function just_test()
    
12.                 {
    
13.                         var str:String = "1111ABCDEFGHIJKLMNOPQRSTUVWXY";
    
14.                         trace("str:"+str);
    
15.                         trace("str_md5:"+MD5.hash(str));
    
16.         
    
17.                         var ba:ByteArray = new ByteArray();
    
18. 
    
19.                         ba.writeUTF(str);
    
20.                         
    
21.                         ba.compress(CompressionAlgorithm.ZLIB);
    
22.                         
    
23.                         var md5:String = MD5.hashBytes(ba);
    
24.                         trace("compress_md5:"+md5);
    
25.                 }
    
26.         }
    
27. }

复制代码

结果

1. str:1111ABCDEFGHIJKLMNOPQRSTUVWXY
   
2. str_md5:2d9552203f69477379cd5a5e32719df8
   
3. ba_md5:216684c7e75d5d0df0c4592a30b0f415

复制代码

sjdy521

为什么要用writeUTF()?而不是writeUTFBytes()

huhuegg

ba.writeUTFBytes(str)我也试过了，也对不上......
str:1111ABCDEFGHIJKLMNOPQRSTUVWXY
str_md5:2d9552203f69477379cd5a5e32719df8
ba_md5:2d9552203f69477379cd5a5e32719df8
compress_md5:e5b7693c99e2dc01769f3b0d4edcd26e