The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

query.pl - Generates DDL for a specified list of objects.

DESCRIPTION

Uses DDL::Oracle to generate the DDL for a query provided in a file. The query should select owner, name for a list of objects of the same type (e.g., TABLE, INDEX, TABLESPACE, etc.). The FROM and WHERE clauses may be anything of the user's choice.

For example, the file might contain:

   SELECT
          owner
        , table_name
   FROM
          dba_tables
   WHERE
          tablespace_name = 'MY_TBLSP'    -- your mileage may vary

The file may contain SQL*Plus's traditional '/', and/or may contain a ';'

AUTHOR

 Richard V. Sutherland
 rvsutherland@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