#! /usr/bin/perl

while (1) {
	print "set log_min_messages=fatal; set client_min_messages=fatal;create schema foo; select * from foo.invalid; drop schema foo;\n";
}