[GENERAL] [PERL DBI] Insertiing data across multiple tables

[JD Wong]

Does anybody know how to insert data over multiple tables transactionally?
The relationship is 1:1 with the latter table having a foreign key
constraint.  In order to add data to Table2 I need to know the primary key
value of the same record in Table1 before it's committed, which in this case
is a serial integer which of course is regulated by an implicit index.  Does
anybody know how to access a column's index in the Perl DBI?
-thanks