Lines Matching refs:client

16 my $client = $server->sock;
24 print $client "get foo\n";
25 $res = <$client>;
33     print $client "get foo$_$spacer\n";
34     $res = <$client>;
45          print $client "get foo\n";
46          $res = <$client>;
51     print $client "get foob\n";
52     $res = <$client>;
66 print $client "set $key 0 0 9\r\nmemcached\r\n";
67 $res = <$client>;
120         print $client "set n,foo$_ 0 0 11000 noreply\r\n$value\r\n";
123     print $client "version\r\n";
124     $res = <$client>;
135     print $client "set bfoo 0 0 11000 noreply\r\n$value\r\n";
163         print $client "cas cas_watch_key 0 0 5 0\r\nvalue\r\n";
164         $res = <$client>;
181     print $client "set vfoo 0 0 4\r\nvbar\r\n";
182     is(<$client>, "STORED\r\n", "stored the key");
184     print $client "get vfoo\r\n";
185     is(<$client>, "VALUE vfoo 0 4\r\n", "read the key header");
186     is(<$client>, "vbar\r\n", "read the key value");
187     is(<$client>, "END\r\n", "read the value trailer");
246     print $client "set vfoo 0 0 4\r\nvbar\r\n";
247     is(<$client>, "STORED\r\n", "stored the key");
250     print $client "md non-existing-key\r\n";
251     is(<$client>, "NF\r\n", "non-existing key can't be deleted");
253     print $client "delete vfoo\r\n";
254     is(<$client>, "DELETED\r\n", "key was deleted");
259     print $client "set vfoo 0 0 4\r\nvbar\r\n";
260     is(<$client>, "STORED\r\n", "stored the key");
262     print $client "md vfoo\r\n";
263     is(<$client>, "HD\r\n", "key was deleted");
268     print $client "set vfoo 0 0 4\r\nvbar\r\n";
269     is(<$client>, "STORED\r\n", "stored the key");
272     print $client "md vfoo I\r\n";
273     is(<$client>, "HD\r\n", "key was marked stale");
275     print $client "mg vfoo\r\n";
276     is(<$client>, "HD X W\r\n", "mg shows key is stale and won recache");
279     print $client "delete vfoo\r\n";
280     is(<$client>, "DELETED\r\n", "key was deleted");