Perl DBH get last id

Perl DBH get last id

SIMPLES with DBH Mysql

my $sth = $dbh->do(“$SQL”);

my $id = $dbh->{‘mysql_insertid’};