AnyEvent-Pg-Pool-Multiserver

 view release on metacpan or  search on metacpan

Makefile.PL  view on Meta::CPAN

use strict;
use warnings;
use utf8;

use ExtUtils::MakeMaker;

WriteMakefile(
  NAME           => 'AnyEvent::Pg::Pool::Multiserver',
  VERSION_FROM   => 'lib/AnyEvent/Pg/Pool/Multiserver.pm',
  PREREQ_PM      => {
    'AnyEvent'           => '7.07',
    'Future'             => '0.27',
    'AnyEvent::Pg::Pool' => '0.14',

example/ex.pl  view on Meta::CPAN

#!/usr/bin/env perl

use strict;
use warnings;
use utf8;
use v5.10;

use lib 'lib';

use AnyEvent;
use AnyEvent::Pg::Pool::Multiserver;

my $servers = [
  {
    id   => 1,

lib/AnyEvent/Pg/Pool/Multiserver.pm  view on Meta::CPAN

package AnyEvent::Pg::Pool::Multiserver;

our $VERSION = '0.4';

use strict;
use warnings;
use utf8;
use v5.10;

use Carp qw( croak carp );
use AnyEvent;
use AnyEvent::Pg::Pool;
use Future;
use Params::Validate qw( validate_with );

use fields qw(
  pool

t/01-test.t  view on Meta::CPAN

use strict;
use warnings;
use utf8;

use Test::More tests => 1;

use_ok( 'AnyEvent::Pg::Pool::Multiserver' );