sub change_mode ($$)
{
  ...(oct($change_value) != oct($c_nice_mode))...
}