奇科電腦 技術小秘訣: Perl 版密碼產生器（新版本）！

技術小秘訣: Perl 版密碼產生器（新版本）！

#!/usr/bin/perl

@list = (0..9, a..z, A..Z,'!','@','#','$','%','^','&','*','(',')');
print $list[rand(@list)] foreach (1..10);

更多技術小秘訣請看以下網頁
 http://www.geego.com.tw/tech_support/new-tips