There's a German website called www.bloedenamen.de (or stupid names) and it has literally hundreds of these aptronyms as we're calling them. Unfortunately they loose a lot in translation, but they really are pretty stupid, dentists called Dr. M. Schmerz (Dr. M. Pain) or Frau Dr. Ute Bohrer (Dr. Drill) etc.
Dunno if there is an English site like this. Anyone?