From 5c5868c24f2481464e5347a902eee1c4ce886b35 Mon Sep 17 00:00:00 2001 From: Alexey Milovidov Date: Tue, 30 Dec 2014 05:12:42 +0300 Subject: [PATCH] dbms: improved test [#TESTIRT-3687]. --- dbms/tests/queries/0_stateless/00039_inserts_through_http.sh | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/dbms/tests/queries/0_stateless/00039_inserts_through_http.sh b/dbms/tests/queries/0_stateless/00039_inserts_through_http.sh index 5264f6e1a18..1aa32a83062 100755 --- a/dbms/tests/queries/0_stateless/00039_inserts_through_http.sh +++ b/dbms/tests/queries/0_stateless/00039_inserts_through_http.sh @@ -3,6 +3,7 @@ echo 'DROP TABLE IF EXISTS test.long_insert' | curl -sSg 'http://localhost:8123' -d @- echo 'CREATE TABLE test.long_insert (a String) ENGINE = Memory' | curl -sSg 'http://localhost:8123' -d @- for string_size in 1 10 100 1000 10000 100000 1000000; do - perl -we 'for my $letter ("a" .. "z") { print(($letter x '$string_size') . "\n") }' | curl -sSg 'http://localhost:8123/?query=INSERT+INTO+test.long_insert+FORMAT+TabSeparated' --data-binary @- + # Если не указать LC_ALL=C, то Perl будет ругаться на некоторых плохо настроенных системах. + LC_ALL=C perl -we 'for my $letter ("a" .. "z") { print(($letter x '$string_size') . "\n") }' | curl -sSg 'http://localhost:8123/?query=INSERT+INTO+test.long_insert+FORMAT+TabSeparated' --data-binary @- echo 'SELECT substring(a, 1, 1) AS c, length(a) AS l FROM test.long_insert ORDER BY c, l' | curl -sSg 'http://localhost:8123' -d @- done