Perl golf

Z Wikipedii, wolnej encyklopedii
Skocz do: nawigacja, szukaj

Perl golf - konkurs sieciowy, polegający na napisaniu najkrótszego programu w Perlu wykonującego dane zadanie. Zwycięskie programy zwykle są pełne rzadkich idiomów, nadużyć składni i semantyki oraz są wyjątkowo nieczytelne.

Przykładowe zadanie[edytuj | edytuj kod]

PIGOLF
pl.comp.lang.perl Perlgolf contest, #5.2

Zadanie

Wypisać na ekranie 1000 cyfr liczby π.

Output

Pojedyncza linia pasująca do wyrażenia /\d{1000}/ i zaczynająca się cyframi 314159

Zasady

Konkurs odbywa się zgodnie ze standardowymi zasadami perlgolfa. Nie wolno jednak wykorzystywać żadnych zewnętrznych modułów, nawet tych, które są w standardowej dystrybucji Perla. Oficjalną wersją interpretera perla jest 5.8.7, na niej powinny działać rozwiązania (tzn. mogą wykorzystywać błędy w perlu 5.8.7, ale nie błędy we wcześniejszych wersjach, które zostały usunięte w wersji 5.8.7). Wartość ta obliczana jest standardowo, jako procentowa zawartość znaków niealfanumerycznych, czyli spoza zbioru [A-Za-z0-9_]. Im mniejsza, tym lepiej.

Przykładowe rozwiązanie[edytuj | edytuj kod]

Autor: Ton Hospel

($c,@0)=map P|($c=$c%($d=10+20*$?).0+$_*$?)/$d,@0while$?-=@0[0,1e3]=3;print@0

Zobacz też[edytuj | edytuj kod]

Linki zewnętrzne[edytuj | edytuj kod]