Fetch data with one row and one column from table using Perl DBI

perl dbi
Mohan picture Mohan · Aug 4, 2013 · Viewed 15.9k times · Source

I am trying to fetch data like (Select 1 from table) which returns data with one row and one column.

I dont want to use $sth->fetchrow_array method to retreive the data in to array. Is there any way to collect the data into scalar variable direclty?

Answer

ikegami picture ikegami · Aug 4, 2013

fetchrow_array returns a list —it's impossible to return an array— and you can assign that to anything list-like such as a my().

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

Or you could simply use

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

Related questions

How do I know how many rows a Perl DBI query returns?

I'm trying to basically do a search through the database with Perl to tell if there is an item with a certain ID. This search can return no rows, but it can also return one. I have the following code: …

Read More
How do I connect with Perl to SQL Server?

I have a user id, password, database name and datasource details. I want to connect with Perl to a MSSQL server. I just used the following snippet, but I am getting an error. #!/usr/bin/perl -w use strict; use …

Read More
Fetch all records using Perl DBI

I have a Perl script that uses a DBI connection. I open and read the SQL script file using a sub routine. I am printing only one record, where I should have two more (three records total). How do I …

Read More