FOO FOO
BAR BAR 
MOO MOO

##</code><code>##

my $select = $DBH->prepare("SELECT FOO, BAR, MOO FROM tble WHERE CONCA
+T(FOO, ', ', BAR, ', ', MOO) LIKE ?");
$select->execute('%'.$info.'%');
$names = $select->fetchall_arrayref();
    foreach $names ( @$names) {
        ($variable1, $variable2, $variable3) = @$names;
}
}

##</code><code>##

my $select = $DBH->prepare("SELECT FOO, BAR, MOO FROM tble WHERE CONCA
+T(FOO, ', ', BAR, ', ', MOO) LIKE ?");
$select->execute('%'.$info.'%');
$names = $select->fetchrow_arrayref();
    
        ($variable1, $variable2, $variable3) = @$names;
}