my %hash = map { chomp; split ',', $_, 2 } <$fh>;