0verMind 21.03.2013 07:11 Work

Я не должен любить PHP.
PHP убивает разум.
PHP это маленький шаг назад, влекущий за собой полную деградацию.
Я встречусь с PHP лицом к лицу.
Я позволю ему пройти мимо меня и только мимо меня.
Когда PHP уйдет, не останется ничего, только Perl.

1. amd63 21.03.2013 13:52 Azoth

Если не тяжело — реализуй плиз на Perl как в #tssoin чтобы было очень похоже на #tssoin/5 — списки, мапы, реверсы, лямбды, разность списков, print, цикл-по-range, ai на одной, bi на другой — и зашли ссылку на http://ideone.com чтоб я подсветку screen-shot и в коллекцию. И чтоб output был один-в-один как в http://ideone.com/ViIman если можно, если не испортится внешний вид (максимум — одна допстрока как "def |" у скалы)

2. komaramd63 /1 22.03.2013 08:10 thinkpad

Как че?

3. amd63komar /2 22.03.2013 08:11 Azoth

как #tsiiof

4. komaramd63 /3 22.03.2013 08:12 thinkpad

Похоже на что?

5. amd63komar /4 22.03.2013 08:13 Azoth

похоже на #tsiiof/5

6. komaramd63 /5 22.03.2013 08:14 thinkpad

Что это за говно и нахуй оно всралось?

7. amd63komar /6 22.03.2013 08:16 Azoth

Коллекционирую. Чтобы зримо, чётко, молодёжно. А не так как вы с улиткой "я бы показал, чем окамл от хаскеля будет отличаться, но мне лень" :)

8. komaramd63 /7 22.03.2013 08:17 thinkpad

Сходи нахуй.

9. amd63komar /8 22.03.2013 08:17 Azoth

Окей, хотя я там уже был.

10. komaramd63 /9 22.03.2013 08:18 thinkpad

И посчитай там факториал.

11. amd63komar /10 22.03.2013 08:20 Azoth

Я когда на Кложуре допилю, я ещё @Sectoid попрошу на CommonLisp-e сделать :)

12. amd63amd63 /11 22.03.2013 08:27 Azoth

@hirtwork на java ещё предложил вариант, но там получилось слишком много букв, некрасиво.

13. komaramd63 /11 22.03.2013 08:28 thinkpad

Ты лучше покажи, что за говно должно выводить это говно.

14. amd63komar /13 22.03.2013 08:28 Azoth

http://ideone.com/ViIman

15. komaramd63 /14 22.03.2013 08:43 thinkpad

Переписал буквально:
n = [0, 3, 5, 6]
a = n + n.reverse.map {|x| 15 — x}
b = (0..15).to_a — a
[a, ' ', b].each{|x| print x}
print "\n"
(0..3).each do |p|
ai = a.map{|x| x ** p}.inject(:+)
bi = b.map{|x| x ** p}.inject(:+)
[ai,bi].each{|x| printf "%5d", x}
print "\n"
end

16. amd63komar /15 22.03.2013 08:45 Azoth

Какая красотища — http://ideone.com/72Ahxr Спасибо! ^_^

Do you really want to delete ?