Lines Matching refs:key

77         for my $key (keys %s) {
78             if ($key =~ m/items:(\d+):number/) {
81                 $sum += $s{$key};
89     my ($key, $orig_flags, $orig_val) = @_;
90     my ($flags, $val, $cas) = $mc->get($key);
96     my ($key, $exp, $orig_flags, $orig_value) = @_;
97     $mc->set($key, $orig_value, $orig_flags, $exp);
98     $check->($key, $orig_flags, $orig_value);
102     my $key = shift;
103     my $rv =()= eval { $mc->get($key) };
109     my ($key, $when) = @_;
110     $mc->delete($key, $when);
111     $empty->($key);
270     my ($cmd, $key, $val, $opaque, $extra_header, $cas) = @_;
273     my $keylen    = length($key);
290     my $full_msg = $msg . $extra_header . $key . $val;
297     my ($cmd, $key, $val, $opaque, $extra_header, $cas) = @_;
299     my $full_msg = $self->build_command($cmd, $key, $val, $opaque, $extra_header, $cas);
327     my ($cmd, $key, $val, $opaque, $extra_header, $cas) = @_;
329     $self->send_command($cmd, $key, $val, $opaque, $extra_header, $cas);
338     my ($cmd, $key, $value) = @_;
340     $empty->($key);
342     $mc->send_silent($cmd, $key, $value, 7278552, $extra, 0);
343     $check->($key, 82, $value);
391     my ($cmd, $key, $val, $extra_header, $cas) = @_;
395     $self->send_command($cmd, $key, $val, $opaque, $extra_header, $cas);
418     my ($cmd, $key, $amt, $init, $exp) = @_;
420     my ($data, $rcas) = $self->_do_command($cmd, $key, '',
438     my ($cmd, $key, $amt, $init, $exp) = @_;
441     $mc->send_silent($cmd, $key, '', $opaque,
447     my $key  = shift;
450     $self->send_command(::CMD_STAT, $key, '', $opaque, '', $cas);
470     my $key  = shift;
471     my ($rv, $cas) = $self->_do_command(::CMD_GET, $key, '', '');
507     my ($key, $expire) = @_;
510     return $self->_do_command(::CMD_TOUCH, $key, '', $extra_header, $cas);
515     my $key    = shift;
518     my ($rv, $cas) = $self->_do_command(::CMD_GAT, $key, '', $extra_header);
538     my ($key, $val, $flags, $expire) = @_;
541     return $self->_do_command(::CMD_ADD, $key, $val, $extra_header, $cas);
546     my ($key, $val, $flags, $expire, $cas) = @_;
548     return $self->_do_command(::CMD_SET, $key, $val, $extra_header, $cas);
553     my ($cmd, $key, $val, $cas) = @_;
554     return $self->_do_command($cmd, $key, $val, '', $cas);
559     my ($key, $val, $flags, $expire) = @_;
562     return $self->_do_command(::CMD_REPLACE, $key, $val, $extra_header, $cas);
567     my ($key) = @_;
568     return $self->_do_command(::CMD_DELETE, $key, '');
573     my ($key, $amt, $init, $exp) = @_;
578     return $self->_incrdecr(::CMD_INCR, $key, $amt, $init, $exp);
583     my ($key, $amt, $init, $exp) = @_;
588     return $self->_incrdecr_cas(::CMD_INCR, $key, $amt, $init, $exp);
593     my ($key, $amt, $init, $exp) = @_;
598     return $self->_incrdecr(::CMD_DECR, $key, $amt, $init, $exp);