Perl

Question

'da bir dizgeyi sıkıştırmak nasıl GZip kullanarak bir veritabanına BLOB olarak eklemeden önce sıkıştırmak istediğim bir dizem var. Ancak, yerleşik GZip Perl modüllerinin hepsi inline dizeleri değil, dosyaları sıkıştırmak için tasarlanmış gibi görünüyor.

PHP'de

Birlikte yeterli olacaktır $ sıkıştırılmış = gzcompress ($ dize)

PHP'nin gzcompress bir Perl eşdeğer nedir()?

Answer 1

IO::Compress::Gzip içinde ihtiyacınız olanı yapmalı gzip işlevi vardır. Bunun gibi bir şey:

gzip \$input => \$output 

PHP'nize çok daha az eşdeğer olabilir. Eğer bellek tamponları içinde her şeyi yapmak istiyorsanız skalerlere referansların kullanıldığını unutmayın, eğer skaler kullanırsanız, o zaman gzip dosya isimlerini düşünecektir.

Answer 2

Belki http://perldoc.perl.org/IO/Compress/Gzip.html?

Answer 3

use Compress::Zlib; 
#then $out = compress($in) or $out = uncompress($in)