From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

package MyTest::API;
use Moo;
has test_client => (is => 'ro', required => 1);
sub rpc_ping {
my $self = shift;
return {result => $self->test_client->call()};
}
sub rpc_fail {
MyTest::Exception->throw(error => "We fail\n");
}
1;