Как подружить этих двух ? threads и mysql в перле ?

Пробовал вызывать SELECT * FROM ... из функции запускаемой ниткой - ругается на переменную $sth расказывая про то что драйвер не может что-то там клонировать.

my $sth = $db->prepare("SELECT
$sth->execute;
^^^__ Error и т.д.

Thread 3 terminated abnormally: DBD::mysql::db prepare failed: handle 2 is owned by thread 8ae5008 not current thread 99d40a0 (handles can't be shared between threads and your driver may need a CLONE method added) at ./script-main-debug.pl line 195.

Если не сложно, киньте живой пример раюоты mysql из функции запущенной ниткой.
Заранее примного благодарен ... :)