Телеграмм чат группы usePerlOrDie страница 24

Size: a a a

use Perl or die;

222 membersпожаловаться на группу

2016 July 27

ID:137363116 in use Perl or die;

ID:137363116 in use Perl or die;

ID:137363116 in use Perl or die;

5:
real 0m17.405s
user 0m17.397s
sys 0m0.007s

источник

15:49пожаловаться #3

naim in use Perl or die;

а ты say

источник

15:52пожаловаться #4

ID:137363116 in use Perl or die;

6:
прошло 3 минуты и ответа от 6 нет

источник

15:52пожаловаться #5

naim in use Perl or die;

просто закоментируй

источник

15:53пожаловаться #6

naim in use Perl or die;

вывод

источник

15:53пожаловаться #7

naim in use Perl or die;

и затести скорость

источник

15:53пожаловаться #8

ID:137363116 in use Perl or die;

там вывод один: say "answer: $r"; и выводится после всех вычислений

источник

15:53пожаловаться #9

ID:137363116 in use Perl or die;

Но явно в 6 что-то не то с вычислениями. Или я не так делаю

источник

15:54пожаловаться #10

ID:137363116 in use Perl or die;

Слишком долго

источник

15:54пожаловаться #11

naim in use Perl or die;

закоментируй вывод

источник

15:55пожаловаться #12

ID:137363116 in use Perl or die;

Даже при том что я указал тип
my Int $r = 0;
for 0..9999 -> $i {
for 0..9999 -> $j {
$r = Int(($r + ($i * $j) % 100) % 47);
}
}
say "answer: $r";

источник

15:55пожаловаться #13

ID:137363116 in use Perl or die;

щас

источник

15:56пожаловаться #14

naim in use Perl or die;

лучше пиши в modern perl там народу больше

источник

15:56пожаловаться #15

ID:137363116 in use Perl or die;

real 0m16.753s
user 0m16.747s
sys 0m0.007s

источник

15:56пожаловаться #16

ID:137363116 in use Perl or die;

на 1 секунду быстрее без вывода

источник

15:57пожаловаться #17

ID:137363116 in use Perl or die;

При этом это ооооочень грубо

источник

15:57пожаловаться #18

ID:137363116 in use Perl or die;

Но REPL в 6 наконец нормальный

источник

15:58пожаловаться #19

ID:137363116 in use Perl or die;

А есть большой файл для парсинга из многих строк?

источник

16:01пожаловаться #20