MySQL、オープンソース系、ウェブ系ネタ。$sth->{mysql_insertid};これで$idに「自分が追加した最新のauto_increment番号」が代入されるただし下記のようにdoでは使えない。perlスクリプトをSpeedyCGIスクリプトとして動作させる場合、グローバル変数の値は保持され続ける。一度接続したデータベースハンドルを使い回すことでデータベースへの接続コストを削減できる。PERLでMySQLにデータを挿入する実験。