#! /usr/bin/perl print "drop table if exists p;\n"; print "create table p (a int) partition by list (a);\n"; for ($i = 0 ; $i < 1000 ; $i++) { printf("create table c%03d partition of p for values in (%d);\n", $i, $i); printf("insert into p values(%d);\n", $i); }