Size: a a a

2021 June 30

SZ

Sergey Zhmylove in Modern::Perl
А что?
источник

М

Млюшевый Пишка... in Modern::Perl
cat /etc/os-release
NAME="CentOS Linux"
VERSION="8 (Core)"
ID="centos"
ID_LIKE="rhel fedora"
VERSION_ID="8"
PLATFORM_ID="platform:el8"
PRETTY_NAME="CentOS Linux 8 (Core)"
ANSI_COLOR="0;31"
CPE_NAME="cpe:/o:centos:centos:8"
HOME_URL="https://www.centos.org/"
BUG_REPORT_URL="https://bugs.centos.org/"

CENTOS_MANTISBT_PROJECT="CentOS-8"
CENTOS_MANTISBT_PROJECT_VERSION="8"
REDHAT_SUPPORT_PRODUCT="centos"
REDHAT_SUPPORT_PRODUCT_VERSION="8"
источник

М

Млюшевый Пишка... in Modern::Perl
for my $port (@ports) {
  #$conn{$port} = $ctx->socket(ZMQ_DEALER);
  $conn{$port} = $ctx->socket(ZMQ_REQ);
   $conn{$port}->die_on_error(1);
  $conn{$port}->connect("tcp://127.0.0.1:$port");
  print $conn{$port}->has_error() . $conn{$port}->last_errno() . "\n";
}

./script/perl ../scripts/zeromq-client.pl 
00
00
00
00
00
00
00
00
00
00
00
pushing to: 42002
pushing to: 42021
pushing to: 42023
pushing to: 62111
pushing to: 42006
pushing to: 42022
pushing to: 42003
pushing to: 42008
pushing to: 42007
pushing to: 42004
pushing to: 42005
got reply 'job is finished 42022 sleep 0' from 42022
got reply 'job is finished 42007 sleep 0' from 42007
got reply 'job is finished 42021 sleep 1' from 42021
got reply 'job is finished 42005 sleep 1' from 42005
got reply 'job is finished 42023 sleep 2' from 42023
got reply 'job is finished 42004 sleep 3' from 42004
got reply 'job is finished 42008 sleep 4' from 42008


и повисаем
источник

М

Млюшевый Пишка... in Modern::Perl
62111 ничего не запущено
источник

М

Млюшевый Пишка... in Modern::Perl
[root@rlp ~]# rpm -qa | grep zeromq
zeromq-4.3.4-2.el8.x86_64
zeromq-devel-4.3.4-2.el8.x86_64
источник

SZ

Sergey Zhmylove in Modern::Perl
Ты тогда strace запусти и посмотри, делает ли он connect
источник

AS

Alexey Stavrov in Modern::Perl
А он точно умеет с 4.3 работать?
источник

М

Млюшевый Пишка... in Modern::Perl
ZMQ::FFI ?
источник

М

Млюшевый Пишка... in Modern::Perl
ща
источник

AS

Alexey Stavrov in Modern::Perl
Ага, просто я зашёл на metacpan и увидел последнюю 4.1)
источник

AS

Alexey Stavrov in Modern::Perl
Но это ничего не значит, надо разбираться
источник

AS

Alexey Stavrov in Modern::Perl
Хороший совет, попробуйте strace  сделать и вывод скинуть
источник

М

Млюшевый Пишка... in Modern::Perl
ошибки есть
источник

М

Млюшевый Пишка... in Modern::Perl
а толку нет ))
источник

М

Млюшевый Пишка... in Modern::Perl
ioctl(28, TCGETS, 0x7ffc79221030)       = -1 ENOTTY (Неприменимый к данному устройству ioctl)
lseek(28, 0, SEEK_CUR)                  = 0
read(28, "do { my $x = {\n  'abi' => {\n    "..., 8192) = 2286
brk(NULL)                               = 0x5ddd000
brk(0x5dff000)                          = 0x5dff000
read(28, "", 8192)                      = 0
close(28)                               = 0
getpid()                                = 2489553
poll([{fd=27, events=POLLIN}], 1, 0)    = 0 (Timeout)
getpid()                                = 2489553
poll([{fd=27, events=POLLIN}], 1, 0)    = 0 (Timeout)
getpid()                                = 2489553
источник

М

Млюшевый Пишка... in Modern::Perl
timeout  есть ошибки нет
источник

М

Млюшевый Пишка... in Modern::Perl
зашибись просто
источник

AS

Alexey Stavrov in Modern::Perl
Это норм тайм-аут, нужно дальше курить
источник

М

Млюшевый Пишка... in Modern::Perl
что значит норм таймаут?
источник

AS

Alexey Stavrov in Modern::Perl
Ну такое может быть. Это не тайм-аут на коннект
источник