Подскажите пожалуйста:
Есть сжатый файл, который открываю для обработки в потоке

open (IN_SOURCE_DMP,"cat $DumpFileName | uncompress |");

обрабатываяю построчно содержимое, а затем записываю новый файл

$OUTPUT_FILE="OUT_DUMP";
open (OUT_DUMP,">${DUMP_PREFIX}.dmp") ;
print $OUTPUT_FILE "$format_line";

А как мне выходной файл в потке сжать compressom?