|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Serg Chervjakov 2:5020/400 02 Jun 2003 22:40:49 To : All Subject : Только с файлами все разрешилось - теперь Mysql --------------------------------------------------------------------------------
Hi All,
Итак. Есть база. Hе важно какая, главное - в mysql. Есть таблица... для
определенности tbuser (порядка 20 тыс. записей). Дык вот проблем - вдруг в
последнее время из нее пошли пропадать записи. Уже 3 раза причем. Пропадать -
это как после
delete from tbuser where login='la-la-la'
Hу я ясно дело пошел производить поиск по скриптам - где трабл. Выяснил, что
ни в одном скрипте даже намека нет на delete from tbuser.
И вот у меня уже возникают подозрения, а достаточно ли такого вот:
sub makequer
{
my $quer=$_[0];
while($quer=~s/;KVH(.*?);KVH/stringheremyforquer/s)
{
my $st=$1;
$st=&prep2base($st);
$quer=~s/stringheremyforquer/'$st'/;
}
#undef $@;
my $sth=$dbh->Query($quer);
if ($Mysql::db_errstr)
{
printfile($errorpath.'zapr',"\n$@\n$Mysql::db_errstr\n$quer");
printheaders();
print 'Error in database request';
exit;
}
return $sth;
}
что бы никаких траблов небыло ($dbh принять за глобальную и существующую и
работающую, ну в общем понятно:), use Mysql объявлено в другой функции - этого
достаточно?).
Какие запросы делаются: "insert" - достаточно редко (точнее очень редко).
"update" - очень часто. "select" - очень часто. Вроде все - больше ничего не
юзаю.
Я к чему - а там никаких flock я надеюсь делать на надааааа??? И если надо,
то какие грабли могут быть, наподобии грабель, возникающих при определеной
последовательности flock'ов?
У меня возникают еще подозрения на хостинг - он недавно удалил одну
запись... по причине того, что один недобросовестный юзер вместо своего мыла
прописал admin@yandex.ru, и на него приперлись новости :))). Hо тут такого
небыло.
F1, F1, F1, то есть тьфу... HELP! HELP! HELP! :)))
--- ifmail v.2.15dev5
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/16679cd845131.html, оценка из 5, голосов 10
|