4 BEGIN { print "1..1\n" }
8 id int auto_increment PRIMARY KEY,
9 foo varchar(255) not null default '',
17 my $tr = SQL::Translator->new(parser => "MySQL",
19 #producer => "SQL::Translator::Producer::Oracle::translate"
20 #producer => sub { Dumper($_[1]) }
23 print $tr->translate(\$create);