Greetings,
One idea, though probably not the most efficient, would be to create two prepared statements, one for insert and another for query.

use DBI;
#connection stuff 
#prepare your statement handles 
#assuming the values are unique enough...
my $sth_ins = $dbh->prepare("INSERT INTO table_foo(col1,col2,col3) VAL
+UES(?,?,?)");
#after the insert run the query on those same values.
my $sth_sel = $dbh->prepare("SELECT id FROM table_foo WHERE col1=?, co
+l2=?, col3=?");

#...later in the code...
my $last_id;
for(@some_data_of_yours){
   $sth_ins->execute($_->{'col1'},$_->{'col2'},$_->{'col3'});
   $sth_sel->execute($_->{'col1'},$_->{'col2'},$_->{'col3'});
   $sth_sel->bind_columns(\$last_id);
   $sth_sel->fetch();
   #do some stuff with your $last_id...
}
[download]

Seems like overkill but at least you can trust the results. Basically a "Read it back to me" strategy.
Not sure how much load this will add to things but since the statements are prepared you get all of those benefits. You can also use the select statement as a pre-check to see if the data is already in the DB. Just a thought...

-InjunJoel

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.