mongodb - perl: 无法连接到 mongodb 服务器

Question

我在从我的 Perl 脚本连接到 mongodb 服务器时遇到问题。

• mongodb 服务器在本地主机端口 27017 上运行正常
• 我可以通过 mongod shell 和 mongo Compass(社区版)访问 mongodb 服务器

但是在尝试通过 Perl 连接时，出现错误:

"MongoDB::SelectionError: No readable server available for matching read preference primary. MongoDB server status:
Topology type: Single; Member status:
localhost:27017 (type: Unknown, error: MongoDB::NetworkError: Could not 
connect to 'localhost:27017': Bad address )"

简单的 perlscript 是:

use strict;
use Data::Dumper;
use open qw/:std :utf8/;
use IO::Handle;
use MongoDB;

#my $client = MongoDB->connect('mongodb://localhost');   
# connect to localhost:27017
my $client = MongoDB::MongoClient->new(host => 'localhost', port => 27017);
my $db   = $client->get_database( 'example');
my $people_coll = $db->get_collection('people');
$db->drop;

行:

my $client = MongoDB::MongoClient->new(host => 'localhost', port => 27017);

似乎没有抛出错误，但尝试创建或修改数据库时会抛出错误。我查看了有关 mongodb 连接问题的类似问题，并尝试关闭防火墙，删除 /tmp/mongodb-27017.sock(尽管我无法在任何地方找到该文件)。

欢迎任何帮助!

Answer 1

默认情况下 MongoDB 服务器可用于 127.0.0.1所以通过 127.0.0.1 更改 localhost

然后如果你想自定义它，这样你就可以从其他计算机客户端访问这个 MongoDB 服务器，请查看这篇文章:https://www.linkedin.com/pulse/mongodb-server-service-windows-10-daniel-pe%C3%B1a/