select name, address, phonehome, phonework from addressbook;

##</code><code>##

select name from addressbook;

##</code><code>##

$info = {
             name => "fred",
};

##</code><code>##

my @case;
while( my $info = $sth->fetchrow_hashref) {
      push @case, $info->{name};
}
print "@case\n";      # prints built up @case.

##</code><code>##

my $names = $dbh->selectcol_arrayref(
               "select name from addressbook where name like ?",
               undef,
               $name 
) or die "select failed. " . $dbh->errstr;

my @case = @$names;   # If you'd rather deal with an array
print "@case\n";      # prints out ALL of the names selected.