end0tknr's kipple - web写経開発

太宰府天満宮の狛犬って、妙にカワイイ

2016-07-04から1日間の記事一覧

perlで mysqlのauto_incrementの値を確認するには、mysql_insertid

sub add_auto_increment_record { my ($self,$dbh) = @_; my $sql =<<EOF; insert into test_table (key, val) values (?, ?) EOF my $sth = $dbh->prepare($sql); my @vals = ('FOO','BAA'); unless($sth->execute(@vals)){ $self->error( $sth->errstr ); return undef; } return $sth->{mysql_insertid}; }</eof;>