Lines Matching refs:self

538     my $self = shift;
542     $self = fields::new($self);
543     $self->{socket} = $sock;
544     return $self;
548     my $self = shift;
575     my $self = shift;
579     my $full_msg = $self->build_command($cmd, $key, $val, $opaque, $extra_header, $cas);
584         my $sent_bytes = $self->{socket}->syswrite($full_msg,
598     my $self = shift;
599     $self->{socket}->flush;
604     my $self = shift;
608     $self->send_command($cmd, $key, $val, $opaque, $extra_header, $cas);
609     $self->send_command(::CMD_NOOP, '', '', $opaque + 1);
611     my ($ropaque, $data) = $self->_handle_single_response;
616     my $self = shift;
626     my $self = shift;
631         $self->{socket}->sysread(my $response, ::MIN_RECV_BYTES - length($hdr));
647         $self->{socket}->sysread(my $buf, $remaining - length($rv));
668     my $self = shift;
674     $self->send_command($cmd, $key, $val, $opaque, $extra_header, $cas);
675     my (undef, $rv, $rcas) = $self->_handle_single_response($opaque);
680     my $self = shift;
696     my $self = shift;
699     my ($data, $rcas) = $self->_do_command($cmd, $key, '',
700                                            $self->_incrdecr_header($amt, $init, $exp));
710     my $self = shift;
711     my ($v, $c) = $self->_incrdecr_cas(@_);
716     my $self = shift;
725     my $self = shift;
729     $self->send_command(::CMD_STAT, $key, '', $opaque, '', $cas);
735         my ($op, $data, $cas, $keylen) = $self->_handle_single_response($opaque);
748     my $self = shift;
750     my ($rv, $cas) = $self->_do_command(::CMD_GET, $key, '', '');
759     my $self = shift;
763         $self->send_command(::CMD_GETQ, $keys[$i], '', $i, '', 0);
767     $self->send_command(::CMD_NOOP, '', '', $terminal);
771         my ($opaque, $data) = $self->_handle_single_response;
785     my $self = shift;
789     return $self->_do_command(::CMD_TOUCH, $key, '', $extra_header, $cas);
793     my $self   = shift;
797     my ($rv, $cas) = $self->_do_command(::CMD_GAT, $key, '', $extra_header);
806     my $self = shift;
807     return $self->_do_command(::CMD_VERSION, '', '');
811     my $self = shift;
812     return $self->_do_command(::CMD_FLUSH, '', '');
816     my $self = shift;
820     return $self->_do_command(::CMD_ADD, $key, $val, $extra_header, $cas);
824     my $self = shift;
827     return $self->_do_command(::CMD_SET, $key, $val, $extra_header, $cas);
831     my $self = shift;
833     return $self->_do_command($cmd, $key, $val, '', $cas);
837     my $self = shift;
841     return $self->_do_command(::CMD_REPLACE, $key, $val, $extra_header, $cas);
845     my $self = shift;
847     return $self->_do_command(::CMD_DELETE, $key, '');
851     my $self = shift;
857     return $self->_incrdecr(::CMD_INCR, $key, $amt, $init, $exp);
861     my $self = shift;
867     return $self->_incrdecr_cas(::CMD_INCR, $key, $amt, $init, $exp);
871     my $self = shift;
877     return $self->_incrdecr(::CMD_DECR, $key, $amt, $init, $exp);
881     my $self = shift;
882     return $self->_do_command(::CMD_NOOP, '', '');
899     my $self = shift;
900     return "Memcache Error ($self->[0]): $self->[1]";
906     my $self = bless $error, (ref $class || $class);
908     return $self;
912     my $self = shift;
913     return $self->[0] == ERR_NOT_FOUND;
917     my $self = shift;
918     return $self->[0] == ERR_EXISTS;
922     my $self = shift;
923     return $self->[0] == ERR_TOO_BIG;
927     my $self = shift;
928     return $self->[0] == ERR_DELTA_BADVAL;
932     my $self = shift;
933     return $self->[0] == ERR_EINVAL;