this should be good enough to gen a random pass eh bored...
//echo -a $regsubex($str(.,5),/./g,$+($r(a,z),$r(1,9),$r(A,Z)))