[EMAIL PROTECTED] wrote:
> 
> Hi,

Hello,

> I am not at all familar to perl. I want to write a small perl script
> which will print a random string of atleast 8 characters. This string I
> intend to use as password for my application.
> I don't know perl at all. perl is in /usr/local/bin/perl
> The script when invovked like should print,
> 
> #perl randon_string.pl
> AQs1QsaL
> 
> etc.
> Can please someone help in this?


# character set to choose from as per your example
my @chars = ( 'a' .. 'z', 'A' .. 'Z', 0 .. 9 );
# pick eight random characters from the array
my $string = join '', map $chars[ rand @chars ], 1 .. 8;



John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to