in reply to DDL Parsing

Is there already a perl script that ...

Probably not

Links of interest
http://search.cpan.org/dist/DDL-Oracle/
SQL::Translator
SQL::Statement

In Section Seekers of Perl Wisdom