День рождения Perl и лучшие решения Golf от Moscow.pm

[ragequit]

Простите, а этот пост о чем? Прикручивать и так упоминаемый ранее сегодня перл чтобы огласить результаты конкурса…

Ээээ.

Што?

[homm]

Раз уж речь опять пошла о конкурсе от Мэйл.ру. Тут госпожа media_magnit обещала разобраться и отписаться, почему один из основных победителей выиграл не заходя на сайт с момента объявления конкурса. С тех пор никаких вестей. Знаете, мы ведь тоже можем отписаться.

[Soboleva]

Да, конечно, мы разобрались. Странички спецпроектов Хабра не связаны с базой данных на Хабре. Поэтому всё честно: человек зарегился на страничке спецпроекта, а на Хабре его активность не отобразилась.

[homm]

Почему же «конечно», если прошло больше полутора месяцев и я 2 раза пытался от вас добиться ответа? Ну хорошо, спасибо.

[Soboleva]

Сорри. В следующий раз лучше пишите в личку

[vsespb]

Что-то по-моему все решения не удовлетворяют условиям конкурса.

1-е место:

Фактически на вручении выяснилось, что для большого ввода оно не работает (а именно, оно должно выдать правильный ответ, пусть даже за миллиард лет, а на самом деле выдаёт неправильный через два часа)

2-е место

$ echo 01 12 31 32|ruby golf.rb
48
(хотя можно составить 32 21 13)

(да и судя по словесному описанию на вручении — там баг в дизайне)

3-е место

$ echo 63 36|perl golf.pl 
0

$ echo 33 33 |perl golf.pl
33

$ echo 33 33 33 | perl golf.pl 
33

«И ещё один код от П.Я., который получил приз зрительских симпатий»

echo "12 23 34" | ruby ruby.rb
34

[TimurN]

$ echo 63 36|perl golf.pl
0

$ echo 33 33 |perl golf.pl
33

$ echo 33 33 33 | perl golf.pl
33

Это один набор домино, там не может быть повторяющихся костяшек.

Хотя на самом деле это моё решение действительно не совсем корректно, есть определённые данные на которых оно фейлится. Есть чуть более длинный вариант, 134 символа:

#!/usr/bin/perl -pl
sub c{$_=pop;s/\d\d/c("@_ $&",$'.$`)/eg;$_=pop;$m=$1 if!/(\d)(\d).*\2\1/&/^ ((.)((.) \4)*\2)$/&y///c>length$m}c$_.reverse;$_=$m//0

Вот для него я пока фейлящих его данных не нашёл. Если кто-нибудь найдёт — мне было бы очень интересно.

Вообще, задача для тестирования нетривиальная — граничных и специфических случаев очень много, и скорость выполнения тестов падает драматически при увеличении их размера.

[vsespb]

Да, во втором варианте не вижу багов.

> Это один набор домино, там не может быть повторяющихся костяшек

А это для меня был сюрприз. В своём решении делал и для повторяющихся, не подумал что кроме опубликованных правил могут быть ещё какие-то, исходящие из специфики домино. Будем считать это была военная хитрость этого конкурса.

А вообще рассчитывал что решения будут тестироваться, было же сказано что не всё то, что проходит тесты, будет считаться правильным. Плюс новые тесты даже не приняли/не отвергли github.com/Shreck/moscow_golf_1410/pull/4