5 has router => (is => 'ro', required => 1);
7 has name => (is => 'ro', required => 1);
10 my ($self, @payload) = @_;
12 my $cb = sub { my ($self, $tag, @r) = @_; @result = @r; $done = 1; };
13 $self->router->send_request($self, $cb, $self->name, @payload);
14 $self->router->run_until($done);