Perl和MongoDB更新问题

Question

i tried to use https://metacpan.org/release/MongoDB module over perl and found a small bug or i haven't enough material on doc

this is where i got error

{ "_id" : ObjectId("4f625c0fcd4481bc13000000"), "mode" : "running", "res" : "running", "custid":NumberLong(155655062)}

db.movie.update({custid:NumberLong(155655062)},{'$set':{mode:"testing"}});

I am able to update the thing here but not able to update from perl code.

my $res = $db->movie->update({'custid'=>'NumberLong(155655062)'},{'$set' => { 'mode' => 'testing' }});

did i miss any code in the above example

Answer 1

my $cust_id = 155655062; OR my $cust_id = int($record->{custid});
my $res = $db->movie->update({'custid'=>$cust_id},{'$set' => { 'mode' => 'testing' }});

Try this, it should work.