Pobieranie danych za pomocą jednego wiersza i jednej kolumny z tabeli przy użyciu języka Perl DBI

Question

Próbuję pobrać dane, takie jak (Select 1 from table), które zwracają dane z jednym wierszem i jedną kolumną.

Nie chcę używać metody $sth->fetchrow_array, aby odzyskać dane w tablicy. Czy istnieje sposób na zbieranie danych do zmiennej skalarnej direclty?

Answer 1

fetchrow_array zwraca listę —, że to niemożliwe, aby powrócić tablicę — i można przypisać, że do niczego list-like takich jak my().

my $sth = $dbh->prepare($stmt); 
$sth->execute(); 
my ($var) = $sth->fetchrow_array() 
    and $sth->finish(); 

Lub może po prostu użyć

my ($var) = $dbh->selectrow_array($stmt); 

Answer 2

my ($value) = @{$dbh−>selectcol_arrayref("select 1 from table")} 

lub lepszą

my ($value) = $dbh−>selectrow_array($statement);