view release on metacpan or  search on metacpan

t/10-exceptions.t  view on Meta::CPAN

    'invalid read timeout (character string; accessor)',
  );

  like(
    exception {
      $redis->read_timeout(-5);
    },
    qr/"read_timeout" must be a positive number/,
    'invalid read timeout (negative number; accessor)',
  );

  return;
}

sub t_min_reconnect_interval {
  like(
    exception {
      my $redis = AnyEvent::Redis::RipeRedis->new(
        min_reconnect_interval => 'invalid',
      );
    },
    qr/"min_reconnect_interval" must be a positive number/,
    "invalid 'min_reconnect_interval' (character string; constructor)",
  );

  like(
    exception {
      my $redis = AnyEvent::Redis::RipeRedis->new(
        min_reconnect_interval => -5,
      );
    },
    qr/"min_reconnect_interval" must be a positive number/,
    "invalid 'min_reconnect_interval' (negative number; constructor)",
  );

  my $redis = AnyEvent::Redis::RipeRedis->new();

  like(
    exception {
      $redis->min_reconnect_interval('invalid');
    },
    qr/"min_reconnect_interval" must be a positive number/,
    "invalid 'min_reconnect_interval' (character string; accessor)",
  );

  like(
    exception {
      $redis->min_reconnect_interval(-5);
    },
    qr/"min_reconnect_interval" must be a positive number/,
    "invalid 'min_reconnect_interval' (negative number; accessor)",
  );

  return;
}

sub t_encoding {
  like(
    exception {
      my $redis = AnyEvent::Redis::RipeRedis->new(
        encoding => 'utf88',
      );
    },
    qr/Encoding "utf88" not found/,
    'invalid encoding (constructor)',
  );

  my $redis = AnyEvent::Redis::RipeRedis->new();

  like(
    exception {
      $redis->encoding('utf88');
    },
    qr/Encoding "utf88" not found/,
    'invalid encoding (accessor)',
  );

  return;
}

sub t_on_message {
  my $redis = AnyEvent::Redis::RipeRedis->new();

  like(
    exception {
      $redis->subscribe('channel');
    },
    qr/"on_message" callback must be specified/,
    "\"on_message\" callback not specified",
  );

  return;
}