어떻게 gzip을 Perl에서 문자열을 압축합니까?

Question

BLOB로 데이터베이스에 삽입하기 전에 GZip을 사용하여 압축하려는 문자열이 있습니다. 그러나 내장 GZip Perl 모듈은 모두 인라인 문자열이 아닌 파일을 압축하도록 설계된 것으로 보입니다.

PHP에서

내가 함께이 작업을 수행 할 $ 압축 = gzcompress ($ 문자열)

PHP의 gzcompress의 펄 상응하는 무엇입니까()?

Answer 1

IO::Compress::Gzip에는 gzip 기능이있어서 필요한 것을 수행해야합니다. 다음과 같은 것 :

gzip \$input => \$output 

은 PHP와 다소 비슷합니다. 일반 스칼라를 사용하는 경우 메모리 버퍼에 모든 것을 수행하려는 경우 스칼라에 대한 참조 사용을 참고하십시오. gzip은 파일 이름이라고 생각합니다.

Answer 2

아마도 http://perldoc.perl.org/IO/Compress/Gzip.html?

Answer 3

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