Problem med Perl

Jag läser på högskolan och halva kursen som vi läser för tillfället inriktar sig på Perl. Som handlar om total noll logik i mitt tycke. Vi hade C++ tidigare men det var enkelt att förstå, eftersom det handlar om logiskt tänkande. Men detsamma fungerar inte Perl på samma sätt. Vi har fått "basic scripts" att lösa och det har jag grejat. Men sedan. Så är det ett stort steg mellan dessa och själva huvuduppgiften. Som jag inte alls förstår hur jag ska gå tillväga för att lösa. Inte ens hur jag ska börja.

Instruktionerna lyder: Evaluate number of logins per user and return a list of users and their number of successful logins. It should be possible to order the list of users by their number of logins.

Som sagt, det står absolut noll uppfattning i skallen på mig. Jag ber er inte att lösa min uppgift men att hjälpa mig på vägen.

Fick du ingen mer info?

Var finns informationen om inloggningar? I en fil, ska du hitta på själv, eller har du gjort någon sorts lista av inloggningar ibtidigare uppgift?

Vi har använt oss av en lista i form av en CSV-fil med användare utifrån de tidigare grundläggande frågorna.

Iterera listan med inloggningar, för varje lyckad inloggning räknar du upp en hash (nyckel användare, värde antal lyckade inloggningar).

Sen kommer det svåra, sortera på värde. Hittar rätt många exempel vid googling, men förstår dem ärligt talat inte då det var länge sen jag jobbade intensivt med Perl.

Edit:

Blev nyfiken. Här kommer en bra ledtråd från mitt egna experiment:

Låter som konstig uppgift att ge er helt ut utan vägledning.

Men om det är en CSV-fil, får ni använda moduler som tex Text::CSV, isf är det otroligt lätt(*). Nu gav du inget exempel på hur CSV-filen ser ut men jag säger att den ska se ut så här:


Inloggningsnamn, antal inloggningar, senaste inloggningen.

Parsa datan:


Koden öppnar $filename och läser in datan till en array @data. Varje element i arrayen är ett hash med olika nycklar (array of hashes). Man skulle kunnat spara det som en array of array men tycker det är lättare senare med namngivna nycklar istället för [0], [1] etc.

Sen för att sortera och skriva ut det på antal inloggningar (fallande).


En liten förklaring kanske. sort-syntaxen ser kanske lite mysko ut vid första ögonkastet. "$a" och "$b" är speciella variabler inne i en "sort {} @array". De är helt enkelt de två element som den just nu försöker sortera ur @array. "$a" är det första och "$b" det andra, "<=>" är numerisk jämförelse.

Så den första delen "$b->{'num'} <=> $a->{'num'}" betyder helt enkelt att den jämför "num"-elementen i data med varandra och stoppar det högre först (då $b är före $a).

"||" är vad den ska göra om den hittar två lika värden. Då går den vidare och kör "$a cmp $b", "cmp" här är alfabetisk sortering. Så den sorterar alfabetiskt stigande (då $a är före $b).


(*): Om ni inte får köra med Text::CSV, fråga varför. Modulerna till Perl är otroligt bra och det finns otroligt många, att inte köra de när de finns är bara dumheter. När man ska lära sig ett språk så är ju syntaxen nästan banal i jämförelse med att lära sig moduler och liknande.

men om de verkligen inte får så kan du göra en simpel regexpsökning som inte kommer ta allt men det mesta.

Jag är riktigt tacksam för era detaljerade svar men jag pratade idag med några klasskamrater och dom nämnde att de använde ingen fil i deras kod. Utan scriptet ska kunna läsa inloggningarna utan en fil.

De nämnde även att kommandot last har alla inloggningar i sig.

qx{}:a lite med last då och regexpa fram det.

Fortfarande en mysko uppgift men men.

Jag är ledsen. Men allt är total förvirring i mitt huvud. Jag vet nämligen inte ens vart jag ska börja med att använda qx och last.

Förlåt för lite sent svar, varit ute o rest. Men något liknande för att lista hur många gånger användarna har loggat in.