BASH
echo "SELECT MAX(id)+1 FROM mytable;" | sqlite3 mydata.db
PERL
use DBI; $dbh = DBI->connect("dbi:SQLite:dbname=mydata.db", "", "", { sqlite_use_immediate_transaction => 1, RaiseError =>1 }) or die $DBI::errstr; my $NextId = $dbh->selectall_arrayref("SELECT MAX(id)+1 FROM mytable;")->[0][0];
No comments:
Post a Comment