Perl MongoDB геопространственный запрос

Question

Я пытаюсь выполнить геопространственный запрос с пакетом MongoDB::Collection для Perl, но он не работает. Кто-нибудь имеет пример использования? Это даже работает? В документации пакета нет конкретного примера, и пример documentation на сайте не работает.

Благодаря

Answer 1

его только массив запроса, так что вы можете преобразовать этот код в PERL:

$earthRadius = 6378; // km 
$range = 35; // max search km 
$max = $range/$earthRadius; 

array(
'lat' => 
    array('$within' => 
     array('$centerSphere' => 
      array(array(floatval( 52.417), floatval(16.883)), 
       $range/$earthRadius) 
     ) 
    ) 
); 


$collection->ensureIndex(array('loc.lat' => "2d"), array('background' => true));