Re^2: map to hash of arrays

Replies are listed 'Best First'.
Re^3: map to hash of arrays by dpuu (Chaplain) on Jul 26, 2004 at 15:22 UTC
Use a while loop, not a map: `my %hash; my $key; while (<>) { /\S+ : (\S+)/ or die "unexpected line format: $_"; my $value = $1; if (defined $key) { push @{ $hash{$key} }, $value; undef $key; else { $key = $value; } }` [download] --Dave Opinions my own; statements of fact may be in error.	[reply] [d/l]
Re^4: map to hash of arrays by emilford (Friar) on Jul 27, 2004 at 13:53 UTC
Why would I want to use this over ccn's solution? Is it a matter of efficiency?	[reply]
Re^5: map to hash of arrays by dpuu (Chaplain) on Jul 27, 2004 at 16:26 UTC
I don't think there's any good reason. ccn assumes, obviously correctly, that the entire data is available in a single string. I didn't realise that. Also, I'd be very tempted to use the /x modifier, and insert some comments.	[reply]
Re^6: map to hash of arrays by emilford (Friar) on Jul 27, 2004 at 21:42 UTC