lib/Object/Remote/Connector/Local.pm

   1 package Object::Remote::Connector::Local;
   2
   3 use Moo;
   4
   5 with 'Object::Remote::Role::Connector::PerlInterpreter';
   6
   7 no warnings 'once';
   8
   9 BEGIN {  }
  10
  11 push @Object::Remote::Connection::Guess, sub {
  12   if (($_[0]||'') eq '-') {
  13       shift(@_);
  14       __PACKAGE__->new(@_);
  15   }
  16 };
  17
  18 1;