my $sql = "select name,address,phone,email from my table where name='mary'";
my $sth=$dbh->prepare($sql) or die "Couldn't prepare statement handle: ".$dbh->errstr();
my $count=$sth->execute() or die "Couldn't execute statement:".$dbh->errstr();
while (my @row=$sth->fetchrow_array()) {

     $AoH{ alldata } = join (' ', @row);
}
$sth->finish();
      

##</code><code>##

   push(@some_array, join('&nbsp;', @row));

##</code><code>##

my $sql="select name,address,phone,email from my table where name=?";
my $sth=$dbh->prepare($sql) or die "Couldn't prepare statement handle: ".$dbh->errstr();
my $count=$sth->execute('mary') or die "Couldn't execute statement:".$dbh->errstr();