Size: a a a

2020 May 18

AT

Artem Tepponen in Modern::Perl
perl -le 'print sprintf("%0.20f", 0.1+0.2)'
0.30000000000000004441
источник
2020 May 19

YS

Yevhen Sabodash in Modern::Perl
это не баг, это фича)
источник

AP

Anton Petrusevich in Modern::Perl
$ perl -Mbignum -E 'say sprintf("%0.21f", 0.1+0.2)'
0.299999999999999988898

$ perl -E 'say sprintf("%0.21f", 0.1+0.2)'
0.300000000000000044409
источник

AP

Anton Petrusevich in Modern::Perl
а вся разница с правильным результатом не превышает
0.000000000000001
источник

DF

Denis F in Modern::Perl
А кто-нибудь шарит в эллиптических кривых?
Вот у меня есть название кривой, public point, приватный ключ и мне из этого добра надо собрать публичный ключ. Я нашел как это сделать на руби и жабе, а вот с перлом что-то глухо как в танке все.
источник

DF

Denis F in Modern::Perl
Точнее не public point, а публичный ключ
источник

AS

Alexey Stavrov in Modern::Perl
Если у тебя все есть, то что тебе надо?
источник

DF

Denis F in Modern::Perl
мне надо создать shared_secret , но Crypt::PK::ECC ( и иже с ним) не жрет этот публичный ключ. В руби и жабе он импортится через паблик поинт, а в перле что-то я не нашел ни одного модуля который такое умеет.
источник

DF

Denis F in Modern::Perl
Либо я что-то делаю не так
источник

DF

Denis F in Modern::Perl
Вот код на руби который делает то, что мне надо
      ec = OpenSSL::PKey::EC.new('prime256v1')
     bn = OpenSSL::BN.new(Base64.decode64(ephemeral_public_key), 2)
     point = OpenSSL::PKey::EC::Point.new(ec.group, bn)

     private_key.dh_compute_key(point)
источник

DF

Denis F in Modern::Perl
а, мля, надо было import_key_raw юзать
источник
2020 May 20

VZ

Vladimir Zhavoronkov in Modern::Perl
Есть тут пользователи Minion? Пользуетесь  parents/children в своих задачах?
источник

М★

Михаил ★ in Modern::Perl
Vladimir Zhavoronkov
Есть тут пользователи Minion? Пользуетесь  parents/children в своих задачах?
форки в задачах?
источник

VZ

Vladimir Zhavoronkov in Modern::Perl
Михаил ★
форки в задачах?
Форков нет. Создаю parent job id, создаю children job id. parent стартует и получает статус finished. children висит в состоянии waiting, через dequeue он не извлекается.
источник

М★

Михаил ★ in Modern::Perl
Vladimir Zhavoronkov
Форков нет. Создаю parent job id, создаю children job id. parent стартует и получает статус finished. children висит в состоянии waiting, через dequeue он не извлекается.
попробовал типовой тест, все нормально, waiting - это не запущен или запущен, но не завершен?
источник

VZ

Vladimir Zhavoronkov in Modern::Perl
Михаил ★
попробовал типовой тест, все нормально, waiting - это не запущен или запущен, но не завершен?
children в состоянии inactive waiting
источник

VZ

Vladimir Zhavoronkov in Modern::Perl
буду смотреть SQL который при dequeue работает. может понятнее будет реализация бекенда
источник

М★

Михаил ★ in Modern::Perl
Vladimir Zhavoronkov
children в состоянии inactive waiting
значит чилд не запускается, странно
источник

VZ

Vladimir Zhavoronkov in Modern::Perl
да, он не стартует. попадает в состояние waiting и в нем висит. может это специфика sqlite бекенда
источник

N

Nekut in Modern::Perl
кто-то работал с GD::Graph ?
источник