Rastgele Şifre Oluşturucu

 
my $password = rand_pass();

sub rand_pass {
my @chars = ('a'..'k','m','n','p'..'z','2'..'9');
my $length = 7;
my $password = '';
for (0..$length) {
$password .= $chars[int rand @chars];
}
return $password;
}
 

Yorum Yapabilmek İçin Üye Girişi Yapmanız Gerekmektedir.

rastgele � ifre oluşturucu