Regex i Perl vägrar spotta ut match

Tjena!

Jag sitter och knackar ihop en uppgift i skolan, men blir tokig på det här med regex. Jag har försökt att separera en sträng ifrån ett systemkommando för att infoga i en hash.

Outputen ifrån systemkommandot talar om hur många gånger en användare har loggat in där användarnamnet följer olika standarder, ex:

33 karl
14 hanna
53 k18daad

Jag vill alltså sära på antalet inlogg och vem som har gjort inloggen. Jag har felsökt hela vägen ner till mitt regex och är säker på att felet antingen ligger i regex-uttrycket, eller i mitt försök att lägga matchningen i en variabel - där det senare är det mest troliga felet.

Exempel på kod jag försökt med:

foreach(@log){

$_ =~ /(^[0-9]+) ([a-zA-Z0-9]+$)/;
my $key = $2;
my $value = $1;
print "Key = $2 value = $1\n";
}

Jag har försökt lite olika variationer på detta, men resultatet är allt som oftast att variablerna får värdet "1", om det finns i strängen. Vad tusan gör jag för fel?

Tack på förhand!

@Tommy: Jag har använt rubular.com i min felsökning är sidan du föreslog ett bättre alternativ? Jag ska se om jag får samma resultat!

@Thomas: Resten ser ut såhär:

Jag har som sagt felsökt och får förväntad output i form av del hela strängen när jag skriver:

foreach(@log){

print "$_\n";
}

Just den här delen ingår i ett större script där andra matchningar görs och jag är medveten om att $1 då kan skapa problem, men samma resultat följer användandet av egendeklarerade variabler.

@Thomas: \s+ gjorde faktiskt skillnad och jag fick nu ut delar utav den output jag vill ha. Så något fel verkar det vara på regex.

Output ifrån Dumper visar att arrayen ser ut precis som förväntat, med en sträng för varje element.

EDIT: hittade felet i mitt test, det saknades ett "+". Nu verkar uttrycket fungera, då ska jag testa att lägga matchningarna i en hash.

Då borde det väl fungera med:

my %hash

$hash{$2} = "$1";

?

@jreklund: Jag var osäker på vart de skulle ligga och jag resonerade att de var en del av "hela" uttrycket - dvs. inom parentes. Jag fick det hela att fungera med hjälpen jag fick tidigare (tack så hemskt mycket, förövrigt) - men sitter nu med ett nytt problem.

Jag ska skapa en array med hashes ifrån inputen ´netstat -lntup´, men jag kommer inte alls på hur jag ska namnge dessa hashes på ett unikt sätt i en foreach-loop. Jag har inte riktigt kommit på vad tanken är det, när det borde fungerat likabra att göra en ensam hash med multipla värden för varje nyckel.

Uppgiften lyder:
"The function has to return an array (one element per listening socket)
and each element is a hash containing the requested information per socket."

Jag försökte att använda någon form av räknare för att namnge varje hash individuellt, men det verkar inte gå att använda en variabel i deklarationen av namnet på hashen. Någon idé ?