my @stuff;
while (<FILEHANDLE>) {
  chomp;
  push @stuff, { map {split /\s*=\s*/} split /,\s*/ }
}