> My problem is that rlm_perl duplicate an attribute in %RAD_REPLY hash.

I’m not sure if this will fix it, but try:

use constant  RLM_MODULE_UPDATED=>   8;#  /* OK (pairs modified) */

then change “return RLM_MODULE_OK” to:

return RLM_MODULE_UPDATED;

If this doesn’t fix it, you can always delete the undesired member from the hash before you return.