use Frontier::Daemon;

sub sumAndDifference {
	my ($x, $y) = @_;
	return {'sum' => $x + $y, 'difference' => $x - $y};
}

# Call me as http://localhost:8080/RPC2
$methods = {'sample.sumAndDifference' => \&sumAndDifference};
Frontier::Daemon->new(LocalPort => 8080, methods => $methods)
	or die "Couldn't start HTTP server: $!";