Size: a a a

2020 June 10

ММ

Максим Максимов... in Modern::Perl
как-то так наверно)
источник

IA

Ivan Avseyanko in Modern::Perl
По какому признаку проверяется идентичность хешей?
источник

ММ

Максим Максимов... in Modern::Perl
O
 {
 "alert_user_id": 2,
 "asset_id": 3992,
 "alert_type": "sms"
}
можно тупо в цикле проверить есть send_time или нет
источник

IA

Ivan Avseyanko in Modern::Perl
Возможно хватит простого grep {} @arr ?
источник

IA

Ivan Avseyanko in Modern::Perl
@array_of_hashes = grep { defined $_->{send_time} ? 1 : 0 } @array_of_hashes;
источник

IA

Ivan Avseyanko in Modern::Perl
Сорри, впопыхах накорябал.
источник

O

O in Modern::Perl
источник

SZ

Sergey Zhmylove in Modern::Perl
O
проверяю отравленно оповещение или нет
Json schema :p
источник

VG

Vadim Goncharov in Modern::Perl
Ivan Avseyanko
Сорри, впопыхах накорябал.
и, наверное, неверно, т.к. автор сам не знает, чего хочет
источник

SZ

Sergey Zhmylove in Modern::Perl
O
[
   {
 "sent_time": 1591199758,
 "alert_user_id": 1,
 "asset_id": 3326,
 "alert_type": "sms"
},
{
 "sent_time": 1591199758,
 "alert_user_id": 1,
 "asset_id": 3330,
 "alert_type": "sms"
},
{
 "sent_time": 1591199758,
 "alert_user_id": 1,
 "asset_id": 3342,
 "alert_type": "sms"
},
 {
 "sent_time": 1591199758,
 "alert_user_id": 2,
 "asset_id": 3326,
 "alert_type": "sms"
},
{
 "sent_time": 1591199758,
 "alert_user_id": 2,
 "asset_id": 3330,
 "alert_type": "sms"
},
{
 "sent_time": 1591199758,
 "alert_user_id": 2,
 "asset_id": 3342,
 "alert_type": "sms"
}
]

не содержит
 {
 "alert_user_id": 2,
 "asset_id": 3992,
 "alert_type": "sms"
}
Можно по полному списку ключей грепнуть, можно просто посчитать число ключей в каждом хеше, например
источник

ММ

Максим Максимов... in Modern::Perl
Vadim Goncharov
и, наверное, неверно, т.к. автор сам не знает, чего хочет
в оригинале было: например, например (с) Паук Троицкий
источник

IA

Ivan Avseyanko in Modern::Perl
Vadim Goncharov
и, наверное, неверно, т.к. автор сам не знает, чего хочет
В таком случае правильного ответа, возможно, и вообще не существует. )
источник

O

O in Modern::Perl
проверю
1 есть ли файл кеша
2 проверить нужно было ли вообще сохраненно в кэш
3 проверю если сохраннено но временная метка старше 3х дней

вот с 2 проблемы
источник

SZ

Sergey Zhmylove in Modern::Perl
Ivan Avseyanko
В таком случае правильного ответа, возможно, и вообще не существует. )
Ещё ни одно несформулированное задание не было решено полностью верно.
источник

VG

Vadim Goncharov in Modern::Perl
а уж когда начинают портянки кода показывать вместо внятной формулировки словами...
источник

SZ

Sergey Zhmylove in Modern::Perl
Что-то мне подсказывает, что sent.pl написано по-пистоньи
источник

O

O in Modern::Perl
Sergey Zhmylove
Что-то мне подсказывает, что sent.pl написано по-пистоньи
скорей по башский
источник

AU

Alexey Ugnichev in Modern::Perl
Sergey Zhmylove
Что-то мне подсказывает, что sent.pl написано по-пистоньи
__init__.py, все дела?
источник

SZ

Sergey Zhmylove in Modern::Perl
O
скорей по башский
Ага
источник

O

O in Modern::Perl
Alexey Ugnichev
__init__.py, все дела?
(defun solve-them-all (list) (car (list)))
источник