thread failed to start: DBD::mysql::db selectall_arrayref failed: handle 2 is owned by thread 804bc20 not current thread 81de810 (handles can't be shared between threads and your driver may need a CLONE method added)
-----------------------
use DBI;
use threads;
use strict;
my @dbh = (DBI->connect(...), DBI->connect(...));
sub query {
my $i = shift;
my $date = $dbh[$i]->selectrow_array("select SYSDATE()");
print $date,'\n';
}
my @tids = ();
for(my $i = 0; $i <= $#dbh; $i++) {
push @tids, threads->new(\&query, $i);
}
for(@tids) {
$_->join;
}
Как заставить работать в таком стиле?
Ответ на:
комментарий
от anonymous
Ответ на:
комментарий
от anonymous
Ответ на:
комментарий
от anonymous
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Похожие темы
- Форум perl+dbi, передача dbh в функцию (2008)
- Форум Не работает perl DBI? (2005)
- Форум PERL + 2 mysql import (2008)
- Форум Затрахался с модулями перла :( (2003)
- Форум Perl, прерывается выполнение программы при невозможности подключения к БД (2014)
- Форум MySQL - DBI Perl - подключение (2001)
- Форум Postfix фильтр подсчета почты (2010)
- Форум Проблема с многопоточным Perl скриптом при запуске через SSH (2011)
- Форум Perl, не работают скрипты с новыми библиотеками (2020)
- Форум Аутенфикация ASP WEBMAILE 2 доменов (2003)