projects
/
scpubgit/Object-Remote.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
timer support in MiniLoop
[scpubgit/Object-Remote.git]
/
lib
/
Object
/
Remote
/
Role
/
Connector.pm
1
package Object::Remote::Role::Connector;
2
3
use Module::Runtime qw(use_module);
4
use Moo::Role;
5
6
requires '_open2_for';
7
8
sub connect {
9
my $self = shift;
10
my %args;
11
@args{qw(send_to_fh receive_from_fh child_pid)} = $self->_open2_for(@_);
12
return use_module('Object::Remote::Connection')->new(\%args);
13
}
14
15
1;