This is an extremely simple script to generate a random password for what ever you may need it for.
#!/usr/bin/perl
@myarray=(A,B,C,1,2,3,4,5,6,7);
for($i=0;$i<$#myarray;$i++){
$j=rand(10);
$randomnum.=$myarray[$j];
}
print $randomnum;
print "\n";
Download
No comments:
Post a Comment