lib/Object/Remote/Tied.pm

   1 package Object::Remote::Tied;
   2
   3 use strictures 1;
   4
   5 #a proxied tied object just ties to the
   6 #proxy object that exists on the remote
   7 #side of the actual tied variable - when
   8 #creating the remote tied variable the proxy
   9 #is passed to the constructor
  10
  11 sub TIEHASH {
  12   return $_[1];
  13 }
  14
  15 sub TIEARRAY {
  16   return $_[1];
  17 }
  18
  19 1;
  20