Как сжать строку в Perl с помощью gzip

У меня есть строка, которую я хотел бы сжать с помощью GZip перед вставкой в ​​базу данных как BLOB. Однако кажется, что все встроенные в GZip модули Perl предназначены для сжатия файлов, а не встроенных строк.

В PHP я бы сделал это с помощью $ compressed = gzcompress ($ string)

Что такое Perl эквивалент PHP gzcompress ()?