Win32::File::GetAttributes($path, $attr);
$attr &= ~COMPRESSED;
Win32::File::SetAttributes($path, $attr);