foreach( @line) { my ( $N, $V) = split( /delim/, $_); my $hash{ $N} = $V; } [download]
In reply to new hash values by paranoid