Password generator: Difference between revisions
m
→functional: small errors introduced in editing of original
SqrtNegInf (talk | contribs) (→functional: Raku alternate version upgraded to meet task specs) |
SqrtNegInf (talk | contribs) m (→functional: small errors introduced in editing of original) |
||
Line 3,479:
subset NumberOfPasswords of UInt where * != 0;
sub MAIN( NumberOfPasswords
&USAGE() if 1 == (.comb ∖ $exclude.comb).elems for @char-groups;
.say for password-characters($length, $exclude )
Line 3,488:
}
sub password-characters( $len,
( (( char-groups($exclude) xx Inf ).map: *.pick).batch( 4)
Z~
|