Oracle FAQ | Your Portal to the Oracle Knowledge Grid |
Home -> Community -> Usenet -> c.d.o.server -> ANNOUNCE: DDL::Oracle v1.09
Release of DDL::Oracle, Version 1.09 ===========================================================================
CHANGES Added type 'schema', which generates the DDL for a named schema(s) for the following object types in the sequence listed:
TYPE
TABLE
INDEX
CONSTRAINT
SEQUENCE
TRIGGER
VIEW
SNAPSHOT LOG
SNAPSHOT
SYNONYM
DATABASE LINK
FUNCTION
PROCEDURE
PACKAGE
PACKAGE BODY
Upgraded CREATE SNAPSHOT to work properly on Oracle versions pre-8i.
Fixed bug #414510 submitted by Henrik Johnson wherein the CREATE TABLE for IOT's was missing the sometime-required OVERFLOW clause. THANKS, Henrik!
Fixed defrag.pl to work on Windows [I think].
SYNOPSIS
use DBI;
use DDL::Oracle;
my $dbh = DBI->connect(
"dbi:Oracle:dbname", "username", "password", { PrintError => 0, RaiseError => 1, } );
# Use default resize and schema options.
# query default DBA_xxx tables (could use USER_xxx for non-DBA types)
::Oracle->configure(
dbh => $dbh, );
# Create a list of one or more objects
my $sth = $dbh->prepare(
"SELECT owner , table_name FROM dba_tables WHERE tablespace_name = 'MY_TBLSP' -- your mileage may vary " );
$sth->execute;
my $list = $sth->fetchall_arrayref;
my $obj = DDL::Oracle->new(
type => 'table', list => $list, ); ); my $ddl = $obj->create; # or $obj->resize; or $obj->drop; etc.
print $ddl; # Use STDOUT so user can redirect to d esired file.
# Here's another example, this time for type 'components'. This type
# differs from the norm, because it has no owner and no name.
my $obj = DDL::Oracle->new(
type => 'components', list => [[ 'no owner','no name' ]] );
my $ddl = $obj->create;
print $ddl;
AUTHOR
Richard V. Sutherland
rvsutherland_at_yahoo.com
COPYRIGHT Copyright (c) 2000, 2001 Richard V. Sutherland. All rights reserved. This module is free software. It may be used, redistributed, and/or modified under the same terms as Perl itself. See:
http://www.perl.com/perl/misc/Artistic.html
AVAILABILITY ===========================================================================
DDL::Oracle is available from the CPAN, and from:
http://sourceforge.net/projects/ddl-oracle/ Received on Sun Apr 29 2001 - 06:14:03 CDT