Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re^2: Populating an array via a DBI call - simplified

by edimusrex (Monk)
on Mar 29, 2017 at 19:27 UTC ( #1186424=note: print w/replies, xml ) Need Help??


in reply to Re: Populating an array via a DBI call - simplified
in thread Populating an array via a DBI call - simplified

Great thread. Seems the answer to my question is as followed --- 

my @accounts = @{$dbh->selectcol_arrayref("SELECT `UserName` FROM Acco
+unt a, asscAccountAccountGroup aaag, asscRoleAccountGroup arag, Role 
+r WHERE a.Id = aaag.AccountId AND aaag.AccountGroupId = arag.AccountG
+roupId AND arag.RoleId = r.Id AND r.Name = 'ROLE_REVIEWER'")};

print join("\n",@accounts);

[download]

Thanks again for pointing me in the right direction

Replies are listed 'Best First'.
Re^3: Populating an array via a DBI call - simplified
by runrig (Abbot) on Mar 29, 2017 at 20:56 UTC
    If you don't really need the entire list of results in an array, you can just fetch one at a time like so:
    
my $sth = $dbh->prepare($sql);
$sth->execute();
$sth->bind_col( 1, \my $user_name );
while ( $sth->fetch() ) {
  print "$user_name\n";
}

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://1186424]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others wandering the Monastery: (5)
As of 2023-11-29 14:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found
    Notices?