projects
/
dbsrgits/SQL-Translator.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Updated with new bin file names.
[dbsrgits/SQL-Translator.git]
/
t
/
03mysql-to-oracle.t
1
#!/usr/local/bin/perl
2
# vim: set ft=perl:
3
4
use strict;
5
use Test::More tests => 1;
6
use SQL::Translator;
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
my $tr = SQL::Translator->new(
17
parser => "MySQL",
18
producer => "Oracle"
19
);
20
21
ok( $tr->translate(\$create), 'Translate MySQL to Oracle' );
22