Lines Matching refs:key
58 foreach {key value} $opts {
59 if {$key eq "pipe"} {
62 if {$key eq "path"} {
114 r set key foo
126 assert_equal "bar" [r get key]
128 assert_equal " bar " [r get key]
130 assert_equal "\"bar\"" [r get key]
132 assert_equal "\tbar\t" [r get key]
140 assert_equal "bar" [r get key]
144 assert_equal "OK\n" [run_cli set key bar]
145 assert_equal "bar" [r get key]
154 r set key "tab\tnewline\n"
155 assert_equal "\"tab\\tnewline\\n\"\n" [run_cli get key]
166 assert_equal "OK\n" [run_cli_with_input_pipe "echo foo" set key]
167 assert_equal "foo\n" [r get key]
172 assert_equal "OK\n" [run_cli_with_input_file $tmpfile set key]
173 assert_equal "from file" [r get key]
177 assert_equal "OK" [run_cli set key bar]
178 assert_equal "bar" [r get key]
187 r set key "tab\tnewline\n"
188 assert_equal "tab\tnewline\n" [run_cli get key]
199 assert_equal "OK" [run_cli_with_input_pipe "echo foo" set key]
200 assert_equal "foo\n" [r get key]
205 assert_equal "OK" [run_cli_with_input_file $tmpfile set key]
206 assert_equal "from file" [r get key]