PerlでmongoDBから返されたデータを取得するには？

Question

私はhttp://api.mongodb.org/perl/current/MongoDB/Examples.htmlを読んでいて、PerlのmongoDBからのドキュメンテーションのようです。 PerlでmongoDBからクエリ結果を取得するにはどうしたらいいですか？私たちはハッシュに言いましょう。私はこれまでdbに接続できました。私はコレクションに挿入を行うことができました。今、selectクエリを発行し、返されたデータをハッシュまたは類似のものにする方法はありますか？

更新：

Example of my data 
{ 
"_id" : ObjectId("asdhgajsdghajgh"), 
"country" : "USA" 
"city" : "Boston" 
} 

{ 
"_id" : ObjectId("asdhgajsdghajgh"), 
"country" : "USA" 
"city" : "Seattle" 
} 

{ 
"_id" : ObjectId("asdhgajsdghajgh"), 
"country" : "Canada" 
"city" : "Calgary" 
} 

My code 

my $cursor = $my_collection 
    ->find({ country => 1 }) 
    ; 
while (my $row = $cursor->next) { 
    print "$row\n"; 
} 

このコードは、任意の出力を得られていません。 基本的にコレクション全体を繰り返し、ドキュメントごとにドキュメントを読みたいと思っています。 私が間違っていることがわかりません。上記のコードを使用しました。私は$ cur-> nextを$ cursor-> nextに変更しました。それは誤っていると推測しています。これまでのすべての答えに感謝します。

Answer 1

これは公式な文書ではありません。 CPANにヘッド右：

• MongoDB::Tutorial
• MongoDB::Examples

反復処理の結果DBIの方法にかなり似ています

use Data::Printer; 
use MongoDB; 

# no query is performed on initialization! 
my $cursor = $collection 
    ->find({ active => 1, country => 'Canada' }) # filter "active" records from Canada 
    ->sort({ stamp => -1 }) # order by "stamp" attribute, desc. 
    ->limit(1000);   # first 1000 records 

# query & iterate 
while (my $row = $cur->next) { 
    # it is 'p', from Data::Printer! 
    p $row; 
}