AnyEvent-RPC

 view release on metacpan or  search on metacpan

ex/sample.pl  view on Meta::CPAN

#!/usr/bin/env perl

use AnyEvent::Impl::Perl;

use lib::abs '../lib';

package AE::RPC::Enc::Sample;

use uni::perl;
use parent 'AnyEvent::RPC::Enc::REST';

sub request {
	my $self = shift;
	my $rpc = shift;
	my %args = @_;

t/00-load.t  view on Meta::CPAN

#!/usr/bin/env perl

use common::sense;
use Test::More tests => 2;
use Test::NoWarnings;
use lib::abs '../lib';
BEGIN {
	use_ok( 'AnyEvent::RPC' );
}

diag( "Testing AnyEvent::RPC $AnyEvent::RPC::VERSION, using AnyEvent $AnyEvent::VERSION, Perl $], $^X" );

t/pod.t  view on Meta::CPAN

#!/usr/bin/env perl -w

use strict;
use Test::More;
use lib::abs "../lib";
BEGIN {
	my $lib = lib::abs::path( ".." );
	chdir $lib or plan skip_all => "Can't chdir to dist $lib";
}

# Ensure a recent version of Test::Pod
eval "use Test::Pod 1.22; 1"
	or plan skip_all => "Test::Pod 1.22 required for testing POD";
eval "use File::Find; 1"
	or plan skip_all => "File::Find required for testing POD";

xt/99-dist.t  view on Meta::CPAN

#!/usr/bin/perl

use lib::abs '../lib';
use Test::More;
use Test::Dist;
use Test::NoWarnings;
chdir lib::abs::path('..');

Test::Dist::dist_ok(
	'+' => 1,
	run => 1,
	skip => [qw(prereq podcover)],
	kwalitee => {