in reply to [OT] Get the database name in Oracle
Have you looked at the various metadata methods in DBI, like table_info(), column_info(), data_sources()? I don't have access to an Oracle db so I can't try them, but some DBD implementations have good support for them.
In Section
Seekers of Perl Wisdom