my %COMPRESSION;
for my $compression (COMPRESSION_NONE, COMPRESSION_GZIP) {
$COMPRESSION{$compression} = $COMPRESSION{0+$compression} = $compression;
}
my %COMPRESSION;
for my $compression (COMPRESSION_NONE, COMPRESSION_GZIP) {
$COMPRESSION{$compression} = $COMPRESSION{0+$compression} = $compression;
}