2016-09-25 129 views
-1

我正在使用Perl模块Crypt::PRNG生成随机数。当使用随机字符串命令时,代数似乎是真正的随机数,它可以使用数字0-9以及其他字符,并创建一个具有指定位数的随机字符串,问题是前导0。编辑executavble命令使Perl中的随机数生成器

perl -MCrypt::PRNG=:all -E "say random_string_from("1234567890", n)" 

,其中n是数字数,是否有可执行命令一个类似于上述固定0领先的,所以我可以肯定地得到正位数?我的意图是只修复“123456789”的第一位数字。有谁知道如何做到这一点?提前致谢。

回答

0

random_string_from("123456789", 1) . random_string_from("1234567890", $n-1) 
0

如何把Crypt::PRNG代码在while循环,直到前面的字符不是0