В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

Modern::Perl

387 membersпожаловаться на группу
2020 September 01

DE

Denis Erygin in Modern::Perl
Василий Степанович Родин
Во-во. Пол дня про удп.
А сказал бы кто-нибудь - как обнаруживать потерю соединения с mysql, чтобы слать в него не sql-запросы почём зря, а команду подключения к базе заново.
оно само умеет $dbh->{'mysql_auto_reconnect'} = 1
источник
00:40пожаловаться#1

SZ

Sergey Zhmylove in Modern::Perl
Василий Степанович Родин
Во-во. Пол дня про удп.
А сказал бы кто-нибудь - как обнаруживать потерю соединения с mysql, чтобы слать в него не sql-запросы почём зря, а команду подключения к базе заново.
Ну как же, как же. Модуль есть для этого специальный жеж
источник
00:41пожаловаться#2

AS

Alexey Stavrov in Modern::Perl
Dmitriy Shamatrin
У нас недавно багу завели, что сервер не отдает котент с кодом ответа 204
Дак поди by design так (т.е. специально, ведь с этим кодом контент не отдаётся)
https://ru.wikipedia.org/wiki/%D0%A1%D0%BF%D0%B8%D1%81%D0%BE%D0%BA_%D0%BA%D0%BE%D0%B4%D0%BE%D0%B2_%D1%81%D0%BE%D1%81%D1%82%D0%BE%D1%8F%D0%BD%D0%B8%D1%8F_HTTP#204
Wikipedia
Список кодов состояния HTTP
статья-список в проекте Викимедиа
источник
07:56пожаловаться#3

AU

Alexey Ugnichev in Modern::Perl
Alexey Stavrov
Дак поди by design так (т.е. специально, ведь с этим кодом контент не отдаётся)
https://ru.wikipedia.org/wiki/%D0%A1%D0%BF%D0%B8%D1%81%D0%BE%D0%BA_%D0%BA%D0%BE%D0%B4%D0%BE%D0%B2_%D1%81%D0%BE%D1%81%D1%82%D0%BE%D1%8F%D0%BD%D0%B8%D1%8F_HTTP#204
Wikipedia
Список кодов состояния HTTP
статья-список в проекте Викимедиа
Это и были комические куплеты ©
источник
09:02пожаловаться#4

AP

Andrei Protasovitski in Modern::Perl
А чем нынче принято lock-файлы делать?
источник
10:58пожаловаться#5

TZ

Troll Zhuravlev in Modern::Perl
Andrei Protasovitski
А чем нынче принято lock-файлы делать?
$ touch > xxx.lock
?
источник
12:03пожаловаться#6

ДЛ

Дмитрий Лапчик... in Modern::Perl
fopen ?
источник
12:14пожаловаться#7

DE

Denis Erygin in Modern::Perl
flock :)
источник
12:22пожаловаться#8

AP

Andrei Protasovitski in Modern::Perl
Troll Zhuravlev
$ touch > xxx.lock
?
Спасибо, кэп! :)
Хотелось бы, чтобы оно ещё проверяло наличие лока и снимало лок, когда процесс завершается... Lock::File делает что-то подобное. Но я его не юзал, поэтому ничего плохого сказать не могу.
источник
12:25пожаловаться#9

AP

Andrei Protasovitski in Modern::Perl
Denis Erygin
flock :)
Да, flock. Только бы обёртку для него.
источник
12:26пожаловаться#10

DE

Denis Erygin in Modern::Perl
тут пример есть perldoc -f flock
источник
12:26пожаловаться#11

IB

Ivan Bessarabov in Modern::Perl
Andrei Protasovitski
Спасибо, кэп! :)
Хотелось бы, чтобы оно ещё проверяло наличие лока и снимало лок, когда процесс завершается... Lock::File делает что-то подобное. Но я его не юзал, поэтому ничего плохого сказать не могу.
Если тебе просто нужно чтобы один скрипт всегда запускался только в одном экземляре, то можно посмотреть на модуль https://metacpan.org/pod/Sys::RunAlone
metacpan.org
Sys::RunAlone
make sure only one invocation of a script is active at a time
источник
12:28пожаловаться#12

DE

Denis Erygin in Modern::Perl
Ivan Bessarabov
Если тебе просто нужно чтобы один скрипт всегда запускался только в одном экземляре, то можно посмотреть на модуль https://metacpan.org/pod/Sys::RunAlone
metacpan.org
Sys::RunAlone
make sure only one invocation of a script is active at a time
Можно и без модулей: pgrep -f  procname
источник
12:30пожаловаться#13

AP

Andrei Protasovitski in Modern::Perl
Ivan Bessarabov
Если тебе просто нужно чтобы один скрипт всегда запускался только в одном экземляре, то можно посмотреть на модуль https://metacpan.org/pod/Sys::RunAlone
metacpan.org
Sys::RunAlone
make sure only one invocation of a script is active at a time
Ну, это тоже нужно, но это не главное.
Есть куча скриптов в crontab. Некоторые из них не могут работать одновременно, потому что могут данные попортить. Нужно, чтобы был лок, при наличии которого скрипт или ждал, пока лок исчезнет, или просто не выполнялся.
источник
12:32пожаловаться#14

DE

Denis Erygin in Modern::Perl
Andrei Protasovitski
Ну, это тоже нужно, но это не главное.
Есть куча скриптов в crontab. Некоторые из них не могут работать одновременно, потому что могут данные попортить. Нужно, чтобы был лок, при наличии которого скрипт или ждал, пока лок исчезнет, или просто не выполнялся.
пример из доки "mailbox appender" то что надо
источник
12:34пожаловаться#15

AP

Andrei Protasovitski in Modern::Perl
Да, оно. Я знаю, как это написать, но мне лень. :) Ищу что-то готовое.
источник
12:35пожаловаться#16

ВР

Василий Степанович Р... in Modern::Perl
Ну такой простой лок вроде и руками пишется минут за 5 - не дольше, чем поиск модуля по метацпанам? 😁
источник
12:35пожаловаться#17

DE

Denis Erygin in Modern::Perl
на bash раннеры сделай с pgrep -f
источник
12:36пожаловаться#18

AP

Andrei Protasovitski in Modern::Perl
Василий Степанович Родин
Ну такой простой лок вроде и руками пишется минут за 5 - не дольше, чем поиск модуля по метацпанам? 😁
Пишется быстро. Поддерживается долго. :)
источник
12:40пожаловаться#19

AP

Anton Petrusevich in Modern::Perl
Denis Erygin
оно само умеет $dbh->{'mysql_auto_reconnect'} = 1
Омг
источник
12:45пожаловаться#20