АН
$cursor->find_one({});без этой строки, базу не проверишь
без этой строки, базу не проверишь
Size: a a a
2021 April 13
без этой строки, базу не проверишь
SZ
Это смотря какой try
АН
это в функции
W
Вроде рассово верный еще только пилят-же, не?
W
Я понял что вы не поняли. Спасибо.
АН
просто, когда использую try/catch, то не могу использовать переменные из того блока
АН
ниже
W
Естественно. И return там не должен работать
W
Он не выйдет из сабы.
W
Вы какой try пользуете?
АН
use Try::Tiny;
АН
Для меня это не очевидно, если есть намек на ошибку, то должен сработать catch
a
а там точно не выполняется? Может, он пишет, но не туда? Попробуйте вместо print - warn...
SZ
Это не так, потому что драйвер очень хитро работает
W
unisocial@dev:~/dev$ perl -e 'use Try::Tiny; sub qwe { try { return } catch { die "Catch;" }; print "You cant see this\n"} qwe()'
You cant see this
Думаем, анализируем. Кумекаем...
You cant see this
Думаем, анализируем. Кумекаем...
АН
perl processor.pl
MongoDB::SelectionError: No readable server available for matching read preference primary. MongoDB server status:
Topology type: Single; Member status:
localhost:5555 (type: Unknown, error: MongoDB::NetworkError: Could not connect to 'localhost:5555': Connection refused )
W
А кто вам сказал что там ошибка случилась?
SZ
Выглядит норм
АН
А как не коннект отлавливать ?
SZ
Сравни, что в переменной