Кстати, существует библиотека для правильного расчета расстояний по координатам: GIS::Distance.