in reply to Password (pseudo)casual
Hello cisco88, and welcome to the Monastery!
In addition to the excellent points made by Corion...
It’s always a good idea to:
use strict; use warnings;
in any Perl script. For one-liners, you can do:
perl -Mstrict -we ...
to get the same benefit. In this case, warnings would have given you messages of the form:
Use of uninitialized value in print...
which arise because the expression rand($len) % $len + 3 sometimes generates array indexes beyond the end of the @lett array.
Get in the habit of always using strict and warnings now, and you will save yourself a lot of time and grief in the future!
Hope that helps,
| Athanasius <°(((>< contra mundum | Iustus alius egestas vitae, eros Piratica, |
In Section
Seekers of Perl Wisdom