my $sql = sprintf("... where CustomField = ? and Name like %s", $dbh->quote($name . '%'));
$agent1 = $dbh->prepare($sql) || die $DBI::errstr;

$Agent1->execute(291)  || die $DBI::errstr ;

( $phone_no,$mail )= $Agent1->fetchrow_array or die "no results :(";