Lines Matching refs:self

308     my $self = shift;
312     $self = fields::new($self);
313     $self->{socket} = $sock;
314     return $self;
318     my ($self, $user, $pass, $mech)= @_;
321     my ($status, $rv, undef) = $self->_do_command(::CMD_SASL_AUTH, $mech, $buf, '');
325     my ($self, $user, $pass, $mech)= @_;
328     my ($status, $rv, undef) = $self->_do_command(::CMD_SASL_STEP, $mech, $buf, '');
332     my ($self)= @_;
333     my ($status, $rv, undef) = $self->_do_command(::CMD_SASL_LIST_MECHS, '', '', '');
338     my $self = shift;
365     my $self = shift;
369     my $full_msg = $self->build_command($cmd, $key, $val, $opaque, $extra_header, $cas);
371     my $sent = $self->{socket}->send($full_msg);
379     my $self = shift;
380     $self->{socket}->flush;
385     my $self = shift;
389     $self->send_command($cmd, $key, $val, $opaque, $extra_header, $cas);
390     $self->send_command(::CMD_NOOP, '', '', $opaque + 1);
392     my ($ropaque, $status, $data) = $self->_handle_single_response;
397     my $self = shift;
407     my $self = shift;
410     $self->{socket}->recv(my $response, ::MIN_RECV_BYTES);
421         $self->{socket}->recv(my $buf, $remaining - length($rv));
439     my $self = shift;
445     $self->send_command($cmd, $key, $val, $opaque, $extra_header, $cas);
446     my (undef, $status, $rv, $rcas) = $self->_handle_single_response($opaque);
451     my $self = shift;
467     my $self = shift;
470     my ($status, $data, undef) = $self->_do_command($cmd, $key, '',
471                                            $self->_incrdecr_header($amt, $init, $exp));
481     my $self = shift;
490     my $self = shift;
494     $self->send_command(::CMD_STAT, $key, '', $opaque, '', $cas);
501         my ($op, $status, $data, $cas, $keylen) = $self->_handle_single_response($opaque);
514     my $self = shift;
516     my ($status, $rv, $cas) = $self->_do_command(::CMD_GET, $key, '', '');
525     my $self = shift;
529         $self->send_command(::CMD_GETQ, $keys[$i], '', $i, '', 0);
533     $self->send_command(::CMD_NOOP, '', '', $terminal);
538         my ($opaque, $status, $data) = $self->_handle_single_response;
552     my $self = shift;
553     return $self->_do_command(::CMD_VERSION, '', '');
557     my $self = shift;
558     return $self->_do_command(::CMD_FLUSH, '', '');
562     my $self = shift;
566     return $self->_do_command(::CMD_ADD, $key, $val, $extra_header, $cas);
570     my $self = shift;
576     return $self->_do_command(::CMD_SET, $key, $val, $extra_header, $cas);
580     my $self = shift;
582     return $self->_do_command($cmd, $key, $val, '', $cas);
586     my $self = shift;
590     return $self->_do_command(::CMD_REPLACE, $key, $val, $extra_header, $cas);
594     my $self = shift;
596     return $self->_do_command(::CMD_DELETE, $key, '');
600     my $self = shift;
606     return $self->_incrdecr(::CMD_INCR, $key, $amt, $init, $exp);
610     my $self = shift;
616     return $self->_incrdecr(::CMD_DECR, $key, $amt, $init, $exp);
620     my $self = shift;
621     return $self->_do_command(::CMD_NOOP, '', '');
639     my $self = shift;
640     return "Memcache Error ($self->[0]): $self->[1]";
646     my $self = bless $error, (ref $class || $class);
648     return $self;
652     my $self = shift;
653     return $self->[0] == ERR_NOT_FOUND;
657     my $self = shift;
658     return $self->[0] == ERR_EXISTS;
662     my $self = shift;
663     return $self->[0] == ERR_TOO_BIG;
667     my $self = shift;
668     return $self->[0] == ERR_DELTA_BADVAL;
672     my $self = shift;
673     return $self->[0] == ERR_AUTH_ERROR;