我有一个简单的stomp脚本连接到activemq,当我运行脚本时,我得到以下错误 “无法sysread():EOF”
Perl脚本代码:
#!/usr/bin/perl
use Net::STOMP::Client;
$stomp = Net::STOMP::Client->new(uri => "stomp://hostname:61616");
$peer = $stomp->peer();
printf("connected to broker %s (IP %s), port %d\n",
$peer->host(), $peer->addr(), $peer->port());
$stomp->connect();
printf("speaking STOMP %s with server %s\n",
$stomp->version(), $stomp->server() || "UNKNOWN");
printf("session %s started\n", $stomp->session());
$stomp->disconnect();
printf("session ended\n");
有人可以让我知道我做错了什么吗?我看到一个类似的帖子,但后来我没有看到相同的回应。 问题是$ stomp-> connect();
答案 0 :(得分:0)
Debug会帮助你
use Net::STOMP::Client;
$stomp = Net::STOMP::Client->new(
uri => "stomp://hostname:61616",
debug => "connection api"
);