Exclude vendorarch and sitearch from FatNode and ModuleSender
[scpubgit/Object-Remote.git] / lib / Object / Remote / Connector / UNIX.pm
CommitLineData
0e547800 1package Object::Remote::Connector::UNIX;
2
3use IO::Socket::UNIX;
4use Moo;
5
6with 'Object::Remote::Role::Connector';
7
fbd3b8ec 8has socket_path => (is => 'ro', required => 1);
9
0e547800 10sub _open2_for {
fbd3b8ec 11 my ($self) = @_;
12 my $path = $self->socket_path;
0e547800 13 my $sock = IO::Socket::UNIX->new($path)
14 or die "Couldn't open socket ${path}: $!";
15 ($sock, $sock, undef);
16}
17
18no warnings 'once';
19
20push @Object::Remote::Connection::Guess, sub {
21 for ($_[0]) {
22 if (defined and !ref and /^(?:\.\/|\/)/) {
fbd3b8ec 23 return __PACKAGE__->new(socket_path => $_[0]);
0e547800 24 }
25 }
26 return;
27};
28
291;