Diff for scripts/perl/oracle/oracledump.pl between version 1.25 and 1.26
| version 1.25, 2008/08/23 14:21:25 |
version 1.26, 2008/08/23 14:22:41 |
|
|
| #!/usr/bin/perl |
#!/usr/bin/perl |
| |
|
| # $Platon: scripts/perl/oracle/oracledump.pl,v 1.24 2008-08-23 14:18:52 nepto Exp $ |
# $Platon: scripts/perl/oracle/oracledump.pl,v 1.25 2008-08-23 14:21:25 nepto Exp $ |
| |
|
| use strict; |
use strict; |
| |
|
|
|
| if (! defined $opt_no_create_info) |
if (! defined $opt_no_create_info) |
| { |
{ |
| print <<MARK; |
print <<MARK; |
| ); |
) TYPE=MyISAM CHARSET=UTF8; |
| MARK |
MARK |
| } |
} |
| |
|
Platon Group <platon@platon.org> http://platon.org/
|
|