#! /usr/bin/perl # printf("drop schema if exists test_schema;\n", $i); printf("create schema test_schema;\n", $i); printf("create table test_schema.t%06d ();\n", $i); for $i (0..100000) { printf("create table test_schema.t%06d ();\n", $i); } printf("set syscache_memory_target = \'1kB\';\n"); printf("set syscache_prune_min_age = \'15s\';\n"); for $i (0..100000) { printf("select * from test_schema.t%06d;\n", $i); }