perl mongodb地理空间数组插入失败

时间:2013-05-29 14:05:16

标签: perl mongodb

我在perl Mojolicious应用程序中运行以下代码。它运行的集合有一个2d索引应用于“loc”属性,它是[lat,long]形式的2元素数组。

MongoDB是2.0.1,perl MongoDB是0.46。 perl是64位

在删除2d索引时,我可以毫不费力地插入/插入新文档。应用索引时,last_error返回“期望的位置对象,位置数组格式不正确”

我尝试过多次操作lat和long输入,但无济于事。这是代码......任何想法?

sub checkmein {
    my $self = shift;
    my $mail = $self->stash('mail');
    my $lat  = $self->param('lat');
    my $lng  = $self->param('long');

    # upsert

    my $c = $self->db->checkins;
    $mail = lc $mail;

    my $now = time;
    my @loc = (Math::BigFloat->new($lng),Math::BigFloat->new($lat));

        $c->update(
            {'mail'=>$mail }, 
            { 'mail'=>$mail, 'when'=>$now, 'loc'=>\@loc  }, 
            { upsert=>1 }
        );

    my $err = $self->db->last_error();

    if (defined $err->{'err'}) {
            $self->render(json=>{'status'=>'error','message'=>"Problem checking in $mail to $lat,$lng"});
    } else {
            $self->render(json=>{'status'=>'ok','message'=>"$mail checked in to $lat,$lng"});
    }

}

1 个答案:

答案 0 :(得分:1)

我不是地理索引方面的专家,但我认为您的坐标可能顺序错误。根据{2}索引的documentation,数组需要采用[ long, lat ]格式,但您有[ lat, long ]。我的猜测是索引器发现lat / long值超出范围。

你也不能将Math :: BigFloat值插入到MongoDB中,但如果perl认为它们是字符串,你可以让perl认为你的值是浮点数,为它们加零。

$lat += 0;
$lng += 0;