How can I fetch the last row I inserted using DBI?

perl dbi
Alan Haggai Alavi picture Alan Haggai Alavi · Dec 15, 2009 · Viewed 30.1k times · Source

How can I fetch the last row that was inserted using DBI (DBD::mysql)?

Code sample:

my $sth = $dbh->prepare('INSERT INTO a ( x, y, z ) VALUES ( ?, ?, ? )');
$sth->execute( $x, $y, $z );

How can I get access to the data that was inserted by the above prepare statement? I need to get the primary ID (AUTOINCREMENT) value.

UPDATE:

From DBD::mysql documentation:

An alternative way for accessing this attribute is via $dbh->{'mysql_insertid'}.

Thank you Manni and n0rd for your answers. :-)

Answer

innaM picture innaM · Dec 15, 2009

This is a property of the statement handle. You should be able to access the ID like that:

$sth->{mysql_insertid}

Related questions

How do I know how many rows a Perl DBI query returns?

I'm trying to basically do a search through the database with Perl to tell if there is an item with a certain ID. This search can return no rows, but it can also return one. I have the following code: …

Read More
How do I connect with Perl to SQL Server?

I have a user id, password, database name and datasource details. I want to connect with Perl to a MSSQL server. I just used the following snippet, but I am getting an error. #!/usr/bin/perl -w use strict; use …

Read More
Fetch all records using Perl DBI

I have a Perl script that uses a DBI connection. I open and read the SQL script file using a sub routine. I am printing only one record, where I should have two more (three records total). How do I …

Read More