@verb #3:"set_gender _set_gender" this none this rxdo #55
@program #3:"set_gender _set_gender" this none this
if ($perm_utils:can_hack())
  return this.gender = args[1]
else
  return E_PERM
endif
.