[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [FWP] YAGOLF: password generation



>>>>> "Abhijit" == Abhijit Menon-Sen <ams@wiw.org> writes:

Abhijit> On 2001-04-11 10:07:28, filipe-brandenburger@procergs.rs.gov.br wrote:
>> 
>> echo|perl -pe "@a=(A..Z,a..z,0..9);eval's##\$a[rand@a]#;'x8"
>> 
>> [...]
>> 
>> Can it still be further shortened?

Abhijit>     (51) perl -e 'print((A..Z,a..z,0..9)[rand 63])for(1..8)'

Penalties for excessive punctuation, *and* for off-by-one.

Two better...

perl -e 'print+(A..Z,a..z,0..9)[rand 62]for 1..8'

Also, you're missing '.' and '/' from the salt set, if that's what
you're working on.

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe