Index: library/mongodb/example-nsf-mongo.tcl =================================================================== diff -u -rc81b840c71a9f0de9d0a502e3e4ddfde57b81fdd -r2837e8ce08344ee3f82a7451109f14a4b7cb3395 --- library/mongodb/example-nsf-mongo.tcl (.../example-nsf-mongo.tcl) (revision c81b840c71a9f0de9d0a502e3e4ddfde57b81fdd) +++ library/mongodb/example-nsf-mongo.tcl (.../example-nsf-mongo.tcl) (revision 2837e8ce08344ee3f82a7451109f14a4b7cb3395) @@ -35,6 +35,9 @@ puts stderr "\nAge > 30" puts [join [::mongo::query $mongoConn tutorial.persons [list \$query object {age object {$gt int 30}}]] \n] +puts stderr "\nCount Age > 30" +puts [::mongo::count $mongoConn tutorial.persons {age object {$gt int 30}}] + puts stderr "\nArray 'a' contains 'x'" puts [join [::mongo::query $mongoConn tutorial.persons [list \$query object {a string "x"}]] \n]