Random password generator

21.5.2007 20:28 | Přečteno: 1847×

Ďalší z jednoduchých skriptíkov, tentokrát na generovanie náhodných hesiel (imho ľahko zapamätateľných

Najprv ukážky výstupu:

(parameter 3)
dyzcha lor
cawagvev
fifixyl
me lunul
fyd xewu m
chotxulwe

(parameter 4)
parhe fonanf
nanbek ret xejf
tymyjgy che
dov myro lo z
takzackubxe
ludgetuwerk
rogtuchiz sev
zixox xuhi
ji cymchuhhix
ku bege pabch

a samotný skript:

my @con = qw( w r t p s d f g h j k l z x c v b n m ch );
my @vow = qw( a e i o u y );
my $len = shift || 10;
my $res = '';
for (1 .. $len) {
    $res .= $con[ int rand scalar @con ];
    $res .= $vow[ int rand scalar @vow ];
    $res .= $con[ int rand scalar @con ]
      if rand > 0.5;
    $res .= ' ' if rand $len < 1 + ($_ - 1) * ($len - $_) * 2 / ($len * $len);
}

$res .= $con[ int rand scalar @con ]
  if rand > 0.5;

print $res, "\n";

       

Komentáře

[Michal Vyskočil]

Osobně bych odstranil písmena z a y, nemám je v heslech rád. Já stejně používám apg, ten umí i ověření hesla oproti cracklib.

[Filip Jirsák]

Pokračoval bych ještě odstraněním i, l a o (případně 0 a 1, používají-li se i číslice). Člověk si poznamená heslo na papírek, a pak aby to zkoušel, jestli to bylo malé el nebo velké I.

[atan]

w bych odstranil, aby se nepletlo s v.

[frdrx]

Tomu tak věřím. Tenhle skript volá domů a prozrazuje autorovi a jeho komplicům všechna hesla v systému, ať už je vygeneroval nebo ne. Je to snaha ovládnout linuxové počítače hloupých uživatelů (a ukřičených k tomu) Ubuntu, a udělat z nich zombie stejně jako ze 73% beden s Windows. To je vrchol: malware už i na tomto serveru. To jsme to dopadli.

[JiK]

A kdyby jenom to, cele je to spiknuti jestirku a zidozednaru, kteri instalovali loutkove vlady a chteji nam tu naimplantovat cipovou totalitu. Je to jasne videt z jejich vrazednych spiknuti ohledne maskovane antigravitacni lode (Tunguzsky meteorit) takzvaneho Roswellskeho UFO incidentu v Area 51 a hlavne v tom jak zli americane podvadeli s pristanim na mesici a jak si znicili World Trade Center v New Yorku. Cele je to spiknuti. Ridi to z odvracene strany mesice, maj tam na zakladne uneseneho Elvise a Zagorovou s Gottem. Vsichni, co ziji mezi nama jsou jen roboti, jinak by starli, ne?

[jm]

Ridi to z odvracene strany mesice, maj tam na zakladne uneseneho Elvise a Zagorovou s Gottem. Vsichni, co ziji mezi nama jsou jen roboti, jinak by starli, ne?

[Robo]

Co mate vsetci proti Ubuntu. To uz neni normalne :))

[frdrx]

Mezi námi: nemyslel jsem z toho vážně ani slovo. Ubuntu, mimochodem, je můj oblíbený desktopový Debian. Ale nikomu ani muk!

[R]

Chybaju tam velke pismena a cisla.

[atan]

Ono toho tam chybi vic.