Подскажите пожалуйста, есть ли способ делать неблокирующий execute в perl DBI?
пример:
my $sth=$dbh->prepare("select 99,pg_sleep(2)");#некий длительный запрос
$sth->execute;#в этом месте ждём выполнения запроса
while(@_=$sth->fetchrow_array){
say @_;
}
Хочется что то вроде такого:
my $sth=$dbh->prepare("select 99,pg_sleep(2)");
$sth->execute_async;#отпраляем запрос и возвращаем управление
#Делаем тут что то полезное ресурсоемкое, а БД в то же время формирует результат
while(@_=$sth->fetchrow_array){#а вот тут уже ждем, если результат еще не готов
say @_;
}
