use strict; use warnings; use TestLib; use Test::More tests => 1; my $tempdir = tempdir; start_test_server $tempdir; issues_sql_like( [ 'clusterdb', '-a' ], qr/statement: CLUSTER.*statement: CLUSTER/s, 'cluster all databases');