DB<13> n
Net::DBus::RemoteService::get_object(/usr/lib/perl5/Net/DBus/RemoteService.pm:144):
144:	    if (@_) {
  DB<13> l
144==>	    if (@_) {
145:		my $interface = shift;
146:		return $self->{objects}->{$object_path}->as_interface($interface);
147 	    } else {
148:		return $self->{objects}->{$object_path};
149 	    }
150 	}
151
152:	1;
153
  DB<13> x @_
0  undef
  DB<14> n
Net::DBus::RemoteService::get_object(/usr/lib/perl5/Net/DBus/RemoteService.pm:145):
145:		my $interface = shift;
  DB<14> n
Net::DBus::RemoteService::get_object(/usr/lib/perl5/Net/DBus/RemoteService.pm:146):
146:		return $self->{objects}->{$object_path}->as_interface($interface);
  DB<14> x $interface
0  undef