projects
/
dbsrgits/SQL-Translator.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Fixed test numbers.
[dbsrgits/SQL-Translator.git]
/
t
/
03mysql-to-oracle.t
1
#!/usr/local/bin/perl
2
# vim: set ft=perl:
3
4
use Test::More;
5
6
plan tests => 1;
7
8
my $create = q|
9
CREATE TABLE random (
10
id int auto_increment PRIMARY KEY,
11
foo varchar(255) not null default '',
12
updated timestamp
13
);
14
|;
15
16
use SQL::Translator;
17
use Data::Dumper;
18
19
my $tr = SQL::Translator->new(parser => "MySQL",
20
producer => "Oracle"
21
);
22
23
ok($tr->translate(\$create));
24