ward/publicscripts
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

nog hippere versie

Browse source
This commit is contained in:
Ward Wouts 2008-09-04 13:00:58 +00:00
parent fbeddcff5a
commit 81fa1050a0
2 changed files with 102 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
pwdmake/pwdmake
View file

@ -3,6 +3,7 @@
# Geen I L O i l o 0 1
@chars=( "A" .. "H", "J", "K", "M", "N", "P" .. "Z", "a" .. "h", "j", "k", "m", "n", "p" .. "z", 2 .. 9, qw(! @ $ % ^ & *) );
foreach ( 1 .. 8 ) {
$passwd = join("", @chars[ map { rand @chars } ( 1 .. 8 ) ]);
print "$passwd\n";