Help for this page

Select Code to Download


  1. or download this
    ...
$attr &= ~COMPRESSED;
Win32::File::SetAttributes($path, $attr);
  2. or download this
    print unpack("B*", pack("N", $attr)), "\n";
# or
printf "%032b\n", $attr;