Gå til innhold

Anbefalte innlegg

Skrevet (endret)

Hei

 

Jeg prøver å få omstokket en passord string, f.eks "ab12BA)%"

 

hvordan kan jeg få stokket om denne til en random rekkefølge?

Endret av berntGunnar
Videoannonse
Annonse
Skrevet

lag en loop som går igjennom hvert av tegnene, også trekk et random tall som så bytter første tegn med tegnet på den plassen du trakk, og fortsett slik til alle er byttet.

Det er hva jeg har tenkt å gjøre på den oppgaven hvertfall ;)

Skrevet

Han skal gennerere et passord med 2 små, 2 store, 2 tall, og 2 tegn, og letteste måten å gjøre det på(uten å tenke) er å lage en string der de kommer i en rekkefølge også stokke om :)

En string er for eksempel

my $tekst="Stringen er det man skriver her" :roll:

Skrevet (endret)

Ka? eg skjønner ka som er som morsomt her? :dontgetit:

Generere passord? koffer ikkje bare lage dei sjøl på gamle måten!?

 

Edit: mulig eg er litt blond her :p

Endret av QBab
Skrevet
Ka? eg skjønner ka som er som morsomt her? :dontgetit:

Generere passord? koffer ikkje bare lage dei sjøl på gamle måten!?

 

Edit: mulig eg er litt blond her :p

6089982[/snapback]

Den muligheten er veldig stor :D

 

F.ex på min tidligere jobb var det mye mailaccounter som skulle settes opp. Det var da greit at det var et lite script som satte opp disse og i tillegg genererte et automatisk passord.

Skrevet

Takk for mange svar. Brukte ideen din Torbjørn. Fant denne på nettet som tar i mot et array og stokker det om:

 

sub shuffle 
{
   my $array = shift;
   my $i;
   for ($i = @$array; --$i; ) {
       my $j = int rand ($i+1);
       next if $i == $j;
       @$array[$i,$j] = @$array[$j,$i];
}

 

Qbab: Poenget er at mange brukere skal legges til samtidig, f.eks en hel bedrift da. Lettere å lage et script som gjør dette for meg. I tillegg er det jo ikke meningen at en admin skal se alle passordene til en bruker i klar teks

Skrevet (endret)

fra modulen List::Util som jeg foreslår, ser koden slik ut:

 

sub shuffle (@) {
 my @a=\(@_);
 my $n;
 my $i=@_;
 map {
   $n = rand($i--);
   (${$a[$n]}, $a[$n] = $a[$i])[0];
 } @_;
}

 

noget mer kryptisk :)

 

EDIT: ser at jeg feilaktig kalte modulen med en 's' for mye

Endret av Torbjørn

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
  • Hvem er aktive   0 medlemmer

    • Ingen innloggede medlemmer aktive
×
×
  • Opprett ny...