my $sql = SQL::Abstract->new(cmp => 'like'); #my $sql = SQL::Abstract->new(case => 'lower', cmp => 'like'); my @fields = qw/company_number short_company_name country_code long_company_name company_stock_symbol_description company_state_province_name company_city_name company_web_address_description/; # check hash for values first! my($stmt, @bind) = $sql->select('company', \@fields, \%HoH); my $sth = $dbh_essweb->prepare($stmt); $sth->trace(4, "Xtrace.log"); $sth->execute(@bind);