in reply to
Source command in perl script
Can you do what you need using DBI and DBD::DB2?
One of the examples (Listing 5) in this article show how to do DDL with DBI and DBD::DB2, so perhaps you can just convert your script.
When your only tool is a hammer, all problems look like your thumb.
Update: Trivial edit (specify which example performs DDL), changed plural to singular.
A foolish day
Just another day
Internet cleaning day
The real first day of Spring
The real first day of Autumn
Wait a second, ... is this poll a joke?
Results (487 votes),