Code:
raw 433:*: { nick $+([random],$regsubex($str(.,$r(5,5)),/./g,$r(a,z))) | halt }