【解決】MongoDB有木有童鞋用過(guò)

jiwang1980

有2個(gè)小問(wèn)題，看了這個(gè)模塊后沒(méi)有找到答案
1.如何執(zhí)行 show dbs 和 show collections這樣的命令 這個(gè)已經(jīng)知道了
2.mapreduce好像未執(zhí)行代碼如下
...
my $map= <<EOF;
function(){
var tmp=this.model+"SPLIT"+this.warning;
emit(tmp, {day:this.day,warning:this.warning,count:1})
}
EOF

my $reduce = <<EOF;
function(key, values) {
   var result = {count:0,day:0,warning:'no'};
   values.forEach(function(v) { result.count += v.count;
   result.day=v.day;
   result.warning=v.warning; });
   return result;
   }
EOF

my $cmd = Tie::IxHash->new("mapreduce" => "ibatis",
             "map" => $map,
             "reduce" => $reduce,
             'query'=>{'day'=>{'$in'=>["$date_tag"]}},
             'out'=>{'replace'=>'respl',db=>'passport'},
          );

my $res = $db->runCommand($cmd);
print Dumper $res;

myeverthing

"好像未執(zhí)行代碼"?？
是什么意思？沒(méi)有任何輸出信息嗎？
還有你的mongodb的是哪個(gè)版本？如果是1.8以上，Output options必須有。

jiwang1980

回復(fù) 2# myeverthing


感謝回復(fù)，用的
2.0.2
加了
'out'=>{'replace'=>'respl',db=>'passport'}
但是在對(duì)應(yīng)的庫(kù)里找不到結(jié)果

   

jiwang1980

回復(fù) 2# myeverthing

group在運(yùn)行后可以直接獲取結(jié)果

而mapreduce
my $res = $db->runCommand($cmd);
的$res的結(jié)果
    $VAR1 = bless( {
                 '_database' => bless( {
                                         '_connection' => bless( {
                                                                   'find_master' => 0,
                                                                   'query_timeout' => 30000,
                                                                   'db_name' => 'admin',
                                                                   'auto_reconnect' => 1,
                                                                   'w' => 1,
                                                                   '_servers' => {},
                                                                   'ts' => 0,
                                                                   'right_port' => 27017,
                                                                   'wtimeout' => 1000,
                                                                   'left_port' => 27017,
                                                                   'port' => 27017,
                                                                   'host' => '127.0.0.1',
                                                                   'max_bson_size' => 16777216,
                                                                   'timeout' => 20000,
                                                                   'auto_connect' => 1
                                                                 }, 'MongoDB::Connection' ),
                                         'name' => 'passport'
                                       }, 'MongoDB:atabase' ),
                 'name' => 'runCommand'
               }, 'MongoDB::Collection' );

myeverthing

對(duì)mongo也只是剛接觸，水平有限~~~
所以mapreduce都是直接在mongo下執(zhí)行看下結(jié)果，再確定perl怎么寫~~
"passport"，有這db吧~~我都是同一個(gè)db下，沒(méi)跨過(guò)db寫，不太清楚，
等高手。。

fayland

你在  collection 下 ->runCommand 了。你應(yīng)該在 db 下 runCommand

Thanks

jiwang1980

回復(fù) 5# myeverthing


兄臺(tái)可否把代碼貼上來(lái)看看。
另外passport的庫(kù)就是調(diào)用 runCommand的庫(kù)

3ks


   

jiwang1980

fayland 發(fā)表于 2012-04-29 10:29
你在  collection 下 ->runCommand 了。你應(yīng)該在 db 下 runCommand

Thanks

兄臺(tái)哪里看到我是在collection下runCommand？
我實(shí)在db下{:2_166:}

jiwang1980

今天跑了下代碼，結(jié)果正確。再次感謝myeverthing，以及其他童鞋