Comments 7
А если я хочу задать последовательность, где следующий член — произведение трёх предыдущих, мне надо писать
* * * * *
? :-)Ребят, а где сейчас перл актуален?
Это не просто Перл, это Перл6 — совсем другой язык. И он нигде не актуален, насколько я понимаю, им занимаются из любви к ковырянию в таких вещах. Перл5 же ещё используется, в основном — по историческим причинам (проект написан на нём или некий коллектив ничего другого знать не желает).
Да, прошли те времена когда я писал SMPP демона на перле, который реализовал казино по СМС. Сейчас всякие руби\питоны да и java начисто вытеснили его из ниши никсовых демонов и скриптовых языков
А какую ошибку выдаст такой код?
my @lost-numbers := 4, 8, 15, 16, 23, 42 ... *;
my @lost-numbers := 4, 8, 15, 16, 23, 42… *;
say @lost-numbers[^6]
4 8 15 16 23 42
my @lost-numbers := 4, 8, 15, 16, 23, 42… *;
say @lost-numbers[^10]
===SORRY!===
Unable to deduce arithmetic or geometric sequence from 16,23,42 (or did you really mean '..'?)
my @lost-numbers := 4, 8, 15, 16, 17… *;
say @lost-numbers[^10]
4 8 15 16 17 18 19 20 21 22
say @lost-numbers[^6]
4 8 15 16 23 42
my @lost-numbers := 4, 8, 15, 16, 23, 42… *;
say @lost-numbers[^10]
===SORRY!===
Unable to deduce arithmetic or geometric sequence from 16,23,42 (or did you really mean '..'?)
my @lost-numbers := 4, 8, 15, 16, 17… *;
say @lost-numbers[^10]
4 8 15 16 17 18 19 20 21 22
Sign up to leave a comment.
Последовательности в Perl 6 / Rakudo