… | |
… | |
176 | my $endpoint = pop @endpoints; |
176 | my $endpoint = pop @endpoints; |
177 | |
177 | |
178 | AE::log 9 => "connecting to $self->{id} at $endpoint"; |
178 | AE::log 9 => "connecting to $self->{id} at $endpoint"; |
179 | |
179 | |
180 | $self->{trial}{$endpoint} ||= do { |
180 | $self->{trial}{$endpoint} ||= do { |
181 | use Carp;AnyEvent::Socket::parse_hostport $endpoint or Carp::confess "not a reslved blabla\n";#d# |
|
|
182 | my ($host, $port) = AnyEvent::Socket::parse_hostport $endpoint |
181 | my ($host, $port) = AnyEvent::Socket::parse_hostport $endpoint |
183 | or return AE::log critical => "$self->{id}: '$endpoint' is not a resolved node reference."; |
182 | or return AE::log critical => "$self->{id}: '$endpoint' is not a resolved node reference."; |
184 | |
183 | |
185 | AnyEvent::MP::Transport::mp_connect |
184 | AnyEvent::MP::Transport::mp_connect |
186 | $host, $port, |
185 | $host, $port, |