view release on metacpan or  search on metacpan

t/sql.t  view on Meta::CPAN

  new_ok($mod, [{%def_args, table_type => 'TEMP'}]),
[
  qr/CREATE\s+TEMP\s+TABLE\s+"data"\s+\(/,
  qr/\s*"a"\s+foo\s*/,
  qr/\)/,
],
  undef,
  $default_drop
);

test_drop(cascade =>
  new_ok($mod, [{%def_args, drop_suffix => 'CASCADE'}]),
  qr/DROP\s+TABLE/,
  qr/"data"/,
  qr/CASCADE/,
);

test_drop(prefix_suffix_drop =>
  new_ok($mod, [{%def_args, drop_prefix => 'DROP TABLE IF EXISTS', drop_suffix => 'CASCADE'}]),
  qr/DROP TABLE IF EXISTS/,
  qr/"data"/,