… | |
… | |
272 | { |
272 | { |
273 | SV *neu = sv_2mortal (newSVpv ("select count(*) > 0 from ", 0)); |
273 | SV *neu = sv_2mortal (newSVpv ("select count(*) > 0 from ", 0)); |
274 | sv_catsv (neu, sql); |
274 | sv_catsv (neu, sql); |
275 | sv_catpv (neu, " limit 1"); |
275 | sv_catpv (neu, " limit 1"); |
276 | sql = neu; |
276 | sql = neu; |
277 | ix -= 6; /* sql_fetch */ |
277 | ix -= 4; /* sql_fetch */ |
278 | } |
278 | } |
279 | |
279 | |
280 | /* check cache for existing statement handle */ |
280 | /* check cache for existing statement handle */ |
281 | sth = lru_fetch (dbh, sql); |
281 | sth = lru_fetch (dbh, sql); |
282 | if (!sth) |
282 | if (!sth) |