mysql - PerlDBI->MySQLを使用するときに空のセットをチェックする方法

Question

DBI-> executeステートメントが空のセットを返すかどうかを確認する方法はありますか？目的は、テーブルを作成し、ユーザー名を要求します。ユーザー名がテーブルにない場合は（空のfetch（）ステートメントを確認します）、テーブルに追加します。助言がありますか？

    $sth = $dbh->prepare("SELECT * FROM table_name_here");
    $sth->execute();

    if(...$sth->fetch() was empty...)
    do something...

score 2 · Accepted Answer

それを試してください：

$sth = $dbh->prepare("SELECT * FROM table_name_here");
$sth->execute();

unless ($sth->fetch()) { do something..; }

score 2 · Accepted Answer

DBI->executeステートメントが空のセットを返すかどうかを確認する方法はありますか

はい。

$sth = $dbh->prepare("SELECT * FROM table_name_here");
$sth->execute();
unless( $sth->rows ) {
    #empty set
}

score 2 · Accepted Answer

このように、レコード数の予備フェッチを行うことをお勧めします

my ($records) = $dbh->selectrow_array('SELECT count(*) FROM table_name_here');

score 1 · Accepted Answer

それを行うための1つの可能なアプローチ：

my $row_count = 0;
while (my @ary = $sth->fetchrow_array() ) { ...; $row_count++; }
unless ($row_count) { 
  ...
}

しかし、この特定のケースでfetchrowは、なぜ使用する必要があるのか、使用する必要がないのか疑問に思わずにはいられません。fetchall実際、私はそれを次のように再編成します。

my ($count) = $dbh->selectrow_array('
   SELECT COUNT(*) FROM users WHERE username = ?'
   undef, $username);
if ($count) { ... }

4 に答える 4