原创
2017-11-22 23:08:52
408 阅读
原创
2011-06-23 16:49:26
2687 阅读
1点赞
原创
2011-06-23 16:07:44
6403 阅读
原创
2011-06-21 15:29:42
389 阅读
原创
2011-06-21 11:41:29
938 阅读
原创
2011-06-20 16:18:23
5016 阅读
转载
2011-06-20 14:45:12
473 阅读
原创
2011-06-18 14:46:44
523 阅读
原创
2011-06-18 14:30:12
1389 阅读
让Perl产生随机密码的方法应该有很多种，在这里只写了个简单的，满足需要就可以了。其实也就是产生一个字符串而已。如下:
#!d:/perl/bin/perl.exe
@a=(0..9,'a'..'z','A'..'Z','#','$','%','*','!','@','^','(',')');
$passwd=join '',map{$a[int rand @a]} 0..9;
say $
原创
2011-06-17 13:22:54
687 阅读
1点赞
原创
2011-06-17 11:28:17
948 阅读
原创
2011-06-03 17:07:26
4352 阅读
1点赞
1评论
原创
2011-06-03 11:19:36
1215 阅读
原创
2011-04-24 21:12:49
7924 阅读
1点赞
原创
2011-04-14 09:33:38
7159 阅读
原创
2011-04-13 14:27:30
3691 阅读
原创
2011-04-07 17:12:35
1350 阅读
原创
2011-04-07 16:48:06
1789 阅读
原创
2011-04-06 17:23:06
382 阅读
原创
2011-04-06 17:05:33
693 阅读
