| |
| 2.5, angra (ok), 02:33, 11/11/2017 [^] [^^] [^^^] [ответить]
| +7 +/– |
 Серьезного ничего, баловства хватает. Разница в скорости с perl5 на два порядка - это приговор данной реализации языка.
| | |
| |
| 3.10, freehck (ok), 00:57, 12/11/2017 [^] [^^] [^^^] [ответить]
| +2 +/– |
 [CODE]
time perl -E 'my $sum = 0; for (my $i = 1; $i <= 100000000; $i++) { $sum += $i; }; say $sum' # real 0m8.459s
time perl6 -e 'my int $sum = 0; loop (my int $i = 1; $i <= 100000000; $i++) { $sum = $sum + $i; }' # real 0m2.068s
time perl6 -e 'say [+] 0..100000000' # real 0m0.158s
[/CODE]
Разница в 2 порядка будет, если программировать на Perl 6 в стиле Perl 5.
Впрочем, после утверждения "Perl 6 обратно совместим с Perl 5" обнаружить, что "Модули, написанные на Perl 5 будут выполняться в 100 раз медленнее" -- это, конечно, подстава.
| | |
| |
| 4.12, angra (ok), 05:31, 12/11/2017 [^] [^^] [^^^] [ответить]
| +3 +/– | |
> Разница в 2 порядка будет, если программировать на Perl 6 в стиле Perl 5
Судя по коду, ты на perl5 пишешь в стиле C. Нормальный программист на perl такое никогда не напишет. Блин, да в доке есть целая секция для таких, объясняющая почему так делать не надо.
$ time perl -E 'my $sum = 0; for (my $i = 1; $i <= 100000000; $i++) { $sum += $i; }; say $sum'
5000000050000000
real 0m7.058s
$ time perl -E '$sum+=$_ for 1..100000000;say $sum'
5000000050000000
real 0m5.652s
А разница на два порядка проявляется не в тривиальной арифметике, а в такой регулярно встречающейся операции как push, то бишь с самым главным, управлением памятью, там всё очень печально.
| | |
| |
| 5.14, freehck (ok), 11:45, 12/11/2017 [^] [^^] [^^^] [ответить]
| +4 +/– |
>> Разница в 2 порядка будет, если программировать на Perl 6 в стиле Perl 5
> Судя по коду, ты на perl5 пишешь в стиле C. Нормальный программист
> на perl такое никогда не напишет.
Поймали. Смухлевал.
> А разница на два порядка проявляется не в тривиальной арифметике, а в
> такой регулярно встречающейся операции как push, то бишь с самым главным,
> управлением памятью, там всё очень печально.
Поймали. Вбросил.
Ладно, я безапелляционно неправ. Приношу свои извинения. Зря я так. :)
| | |
| 5.15, Anonymoustus (ok), 03:02, 14/11/2017 [^] [^^] [^^^] [ответить]
| –1 +/– |
 >> А разница на два порядка проявляется не в тривиальной арифметике, а в такой регулярно встречающейся операции как push, то бишь с самым главным, управлением памятью, там всё очень печально.
Тогда в чём же его смысл?
| | |
|
|
|
|
| |
| 2.13, angra (ok), 05:33, 12/11/2017 [^] [^^] [^^^] [ответить]
| +1 +/– |
А там когда-то был сабж? Или ты не отличаешь perl и perl6 ?
| | |
|
| 1.16, Аноним (-), 11:28, 14/11/2017 [ответить] [﹢﹢﹢] [ · · · ]
| –1 +/– |
Эту поделку ещё не зарыли?? Харэ, ребзя. Ну довели вы его до релизного состояния за 10 лет, молодцы, доказали, что можете. Зачем распылять усилия сообщества?
| | |
|
