foreach my $k (keys %hash){
    $hash{$k} =~ s/,(?! )/, /g;
  }
[download]

Update: $hash{$_} =~ s/,(?! )/, /g for keys %hash;
Update: Taking it even one more step is tedpride's nice solution below, avoiding keys altogether.