You're viewing old version number 1. - Current version

Perl code to create random string of characters

mixed-case, alphanumeric, 8 chars long

#!/usr/bin/perl -wT

use strict;

my @chars = ("A".."Z", "a".."z", "0" .. "9");
my $string;
$string .= $chars[rand @chars] for 1..8;

print $string . "\n";

#perl #programming

From JR's : articles
31 words - 208 chars
created on - #
source - versions

Related articles
Web and mobile development using Perl, HTML5, CSS3, and JavaScript - May 28, 2013
Using Perl and Erlang - Jan 19, 2015
Perl Dancer Framework - Dec 19, 2013
Perl HTML parsing modules - Oct 01, 2013
Perl code for string processing - Jul 06, 2013
more >>



A     A     A     A     A

© 2013-2017 JotHut - Online notebook

current date: Jan 12, 2025 - 8:52 a.m. EST