my %hash = map { split /delim/, $_, 2  } @line;