use Frontier::Daemon

my $id = Frontier::Daemon->new(
                                methods => {
				             sum => \&sum,
					     },
				LocalAddr => '127.0.0.1',
				LocalPort => 80,
				Reuse => 1,
				) or die ("Cannot start RCP daemon: $!");

sub sum {

  my $self = shift;  # This is getting arg1 not the object reference!
  my $arg1 = shift;  # This is getting arg2.
  my $arg2 = shift;
   ...
}