I like the comma_count solution, you checked all bordercases. Maybe offer a perlgolf competition on this code :)

Particularly this code ($comma_count==3): s/(,)/!--$n ? '.' : $1/ge;

I liked that approach.

Found a bug though. This one is successful, but gives a bad coordinate back:

47 58.8300, -116 33,5160
[download]