Select Code to Download

use warnings;
use strict;
...
    my $row = $sth->execute("bar$i");
    say $dbh->last_insert_id;
}