Perl MongoDB地理空间查询

Question

我正在尝试使用Perl的MongoDB::Collection包执行地理空间查询，但它不起作用。有没有人有一个例子？它甚至有用吗？包文档中没有具体示例，网站上的示例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) );