What would a minimal example for a choropleth map in Mathematica look like?

Question

What would a minimal example for a choropleth map in Mathematica look like?

I can read in a ESRI Shapefile using Import, but do not know how to work with th

Answer 1

Because I cannot resist a Code Golf competition with belisarius:

Graphics[{Hue[i~#~"Area"/10^7],i~#~"Polygon"}~Table~{i,#[]}&@CountryData]

(for the same result)