view release on metacpan or  search on metacpan

lib/Apache/BalancerManager/Member.pm  view on Meta::CPAN

      _nonce         => 'nonce',
      _url           => 'url',
      _get           => '_get',
      _post          => '_post',
   },
);

sub disable { $_[0]->status(0) }
sub enable { $_[0]->status(1) }

sub update {
   my $self = shift;

   my $uri = URI->new($self->_url);
   my $form = {
      w_status_D => ( $self->status ? 0 : 1 ),
      w_status_I => 0,
      w_status_N => 0,
      w_status_H => 0,
      w_status_R => 0,
      w_status_S => 0,