Perl

2011-01-25 64 views
10

'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.Perl

PHP'de

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

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

cevap

26

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.

+1

Teşekkürler, harika çalıştı. Dokümantasyondaki "skaler referans" biti beni fırlatıyordu. – Dave

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