Говнокод: по колено в коде.

• Все
• Лучший
• Сток
• Глупый поиск
• Наговнокодить!
• Oтзывы

Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!

1. PHP (5704)
2. C++ (2739)
3. Куча (2355)
4. JavaScript (2029)
5. C# (1928)
6. Java (1502)
7. Си (1113)
8. Pascal (647)
9. Python (583)
10. 1C (538)
11. SQL (432)
12. ActionScript (292)
13. Objective C (202)
14. bash (198)
15. Perl (194)
16. Assembler (146)
17. Ruby (145)
18. VisualBasic (138)
19. Lua (49)
20. Go (31)
21. Swift (27)
22. Haskell (26)
23. Kotlin (14)

1. Perl / Говнокод #23358

   +3

   1. 1

   print for <>

   Базовая функциональность программы cat на perl. Кто короче?
   (только возможности самого языка без exec и подобных, шеллы вне олимпиады)

   Запостил: Elvenfighter, 24 Сентября 2017

   Tweet

   Комментарии (64) RSS

   • Elvenfighter 24.09.2017 01:20 # 0

     Конкатенация работает: cat.pl file1 file2
     Читание из Stdin: cat.pl < file1

     Ответить

   • FrauSchweinhund 24.09.2017 01:48 # 0

     > шеллы вне олимпиады
     > perl

     Ответить

     • AnalPerOral 24.09.2017 01:57 # 0

       Willst du meine große Gurke lecken?

       Ответить

     • Elvenfighter 24.09.2017 15:04 # 0

       echo /usr/bin/perl | sudo tee -a /etc/shells
       sudo usermod -s /usr/bin/perl $USER

       
       
       Давай-давай, я посмотрю. Для тренировки можешь начать с perlconsole

       Ответить

       • guest8 07.09.2019 20:07 # −999

         показать все, что скрытоvanished

         Ответить

     • SemaReal 27.09.2017 03:41 # 0

       перл ненужное прыщеговно для красноглазых шкриптоблядей!!!1

       Ответить

       • inkanus-gray 27.09.2017 09:43 # 0

         А Питон?

         Ответить

         • gost 29.09.2017 09:35 # 0

           А на него ходят.

           Ответить

           • inho 29.09.2017 19:44 # 0

             Куда пропадал, гост?

             Ответить

             • gost 30.09.2017 09:58 # +1

               Так ведь нелюди поганые, басурмане проклятые, нехристи окаянные и мужеложцы богопротивные Говнокодик до комы довели. А уютный форум и того раньше лёг.

               Ответить

               • Bmopou_nemyx 07.09.2019 09:35 # 0

                 Это фристайл?

                 Ответить

                 • IIIyqpymuHckuu_nemyx 07.09.2019 11:20 # 0

                   Freestyler
                   Rock the microphone
                   Carry on with the freestyler
                   Yeah, straight from the top of my dome
                   As I rock, rock, rock, rock, rock the microphone
                   Yeah, straight from the top of my dome
                   As I rock, rock, rock, rock, rock the microphone
                   Yeah, straight from the top of my dome
                   As I rock, rock, rock, rock, rock the microphone
                   Yeah, straight from the top of my dome
                   As I rock, rock, rock, rock, rock the microphone

                   Ответить

                 • guest8 07.09.2019 20:05 # −999

                   показать все, что скрытоvanished

                   Ответить

       • guest8 07.09.2019 11:16 # −999

         показать все, что скрытоvanished

         Ответить

       • Bmopou_nemyx 07.09.2019 16:58 # 0

         Именно поэтому я за «Перл».

         Ответить

         • guest8 07.09.2019 20:02 # −999

           показать все, что скрытоvanished

           Ответить

           • guest8 07.09.2019 20:19 # −999

             показать все, что скрытоvanished

             Ответить

             • guest8 07.09.2019 20:23 # −999

               показать все, что скрытоvanished

               Ответить

               • guestinxo 07.09.2019 20:25 # 0

                 Не понимаю (

                 Ответить

                 • guest8 07.09.2019 20:27 # −999

                   показать все, что скрытоvanished

                   Ответить

                   • guest8 07.09.2019 20:28 # −999

                     показать все, что скрытоvanished

                     Ответить

                     • guest8 07.09.2019 20:28 # −999

                       показать все, что скрытоvanished

                       Ответить

   • antox 24.09.2017 16:41 # +4

     Сэкономил 2 байта сорца, схавал >9000 памяти.
     seq 100500 | memusage perl -e '() for <>'
     seq 100500 | memusage perl -e '() while <>'

     Ответить

     • bormand 24.09.2017 17:08 # 0

       for <> весь поток сначала затянет в память, а while <> - нет?

       Ответить

       • antox 24.09.2017 17:25 # +5

         Да, for даёт списковый контекст, и в нём ромбик возвращает все строки разом. А во while <> будет выдавать по одной.

         Ответить

         • MAKAKA 10.07.2020 00:27 # 0

           Вот за это я и люблю перл

           Ответить

     • Elvenfighter 25.09.2017 21:20 # +1

       Вот поэтому на Perl пишут однострочниками

       Ответить

     • guest8 07.09.2019 20:05 # −999

       показать все, что скрытоvanished

       Ответить

   • dionys 25.09.2017 00:01 # 0

     perl -pe0 <file_1> ... <file_n>

     Ответить

     • dionys 25.09.2017 00:04 # +2

       Если нужен именно скрипт:
       

       #!perl -p

       Ответить

       • Stallman 19.10.2017 12:03 # 0

         К слову, так и на руби можно
         

         #!ruby -pn

         Ответить

         • guest8 06.09.2019 22:11 # −999

           показать все, что скрытоvanished

           Ответить

   • Xom94ok 25.09.2017 21:25 # +10

     *ткнул в случайный яп на вики в разделе бесполезного говна*
     *форкнул заброшенный гитхаб / втёрся в доверие к разрабу*
     *запилил правило "пустая программа -> работать аки кат согласно позикс"*
     *победная кружка чаю*

     Ответить

     • Elvenfighter 28.09.2017 20:12 # +3

       Как выяснилось когда-то такой мыслью уже ударило в мозг разработчиков sed (тогда еще даже не по-хипстерски "концептуально нового" ЯП, а stream editor)

       Ответить

   • Stallman 26.09.2017 00:14 # +4

     awk:
     

     { print }

     Ответить

     • bormand 26.09.2017 07:50 # 0

       А sed так умеет? А то там, походу, пустой скрипт прокатит.

       Ответить

       • Stallman 26.09.2017 12:37 # +3

         Умеет. Это безоговорочная победа.

         Ответить

         • guest8 06.09.2019 22:11 # −999

           показать все, что скрытоvanished

           Ответить

   • inho 26.09.2017 19:13 # 0

     Что делает этот кот?

     Ответить

     • bormand 26.09.2017 19:20 # +6

       КонКОТенирует файлы.

       Ответить

       • SemaReal 19.10.2017 06:00 # 0

         схуябы?
         он поедает stdin и высерает stdout

         Ответить

         • bormand 19.10.2017 06:59 # 0

           Магия пёрла.

           Ответить

           • inkanus-gray 19.10.2017 08:26 # +2

             Откуда?

             Ответить

   • Elvenfighter 28.09.2017 20:13 # 0

     Больше print'ов богу <>!

     Ответить

   • gost 29.09.2017 09:39 # +3

     Базовая функциональность программы true на Perl:
     

     Ответить

     • Stallman 29.09.2017 16:26 # +4

       ... а так же на PHP, Python, Ruby, JS, Lua, Bash ... (продолжить список скриптушни)

       Ответить

       • Stallman 29.09.2017 16:39 # +5

         Но это только базовая функциональность. Так-то /bin/true должна еще суперпознавательный хелп уметь показывать.

         Ответить

         • bormand 29.09.2017 18:44 # 0

           Там даже одно время баг был с чтением за пределами стекового фрейма...
           
           Что-то типа printf(argv[0]);

           Ответить

         • vistefan 19.10.2017 09:25 # 0

           Кстати, я вот сейчас пробую в Ubuntu

           > true --help

           и

           > true --version

           , в мане пишут, что он должен выдавать хелп и версию, но он всё равно игнорирует эти аргументы (как и написано в мане), так что ничего не выводится. Так что, возможно, это ВЕСЬ функционал true.
           У кого-то иначе?

           Ответить

           • Stallman 19.10.2017 11:58 # 0

             type true

             
             У тебя, скорее всего, вызывается башевский встроенный тру. Попробуй явно - /bin/true --help

             Ответить

             • vistefan 19.10.2017 11:59 # 0

               Всё так, как ты сказал.

               Ответить

             • guest8 06.09.2019 22:11 # −999

               показать все, что скрытоvanished

               Ответить

         • guest8 06.09.2019 22:11 # −999

           показать все, что скрытоvanished

           Ответить

       • guest8 06.09.2019 22:11 # −999

         показать все, что скрытоvanished

         Ответить

         • raMagPuJI 04.10.2019 02:05 # 0

           Спасибо, иди нахуй.

           Ответить

           • cmepmop 04.10.2019 14:21 # 0

             Спасибо.

             Ответить

           • guest8 04.10.2019 14:22 # −999

             показать все, что скрытоvanished

             Ответить

             • cmepmop 04.10.2019 14:24 # 0

               Далеко не весь спам был мой. Я спамил только ради того, чтобы дискредитировать xyz и забанить тебя. Но я тебя уже простил. Надеюсь, урок усвоен.
               
               Вбросы на стоке и подначивающий спам (видать, кто-то подымает активность) не мои.

               Ответить

               • nymuHckuu_nemyx 04.10.2019 23:39 # −102

                 показать все, что скрытозапоздалый фиксап
                 
                 И постинг на .хуй упал до изначальных двух ватников. Вот это самое главное достижение.
                 
                 На бывшей территории Палермо
                 В заросшем лопухами огороде
                 Они потом якшались все друг с другом
                 И не было в их жизни больше кайфа

                 Ответить

                 • nemyx_pycu4 05.10.2019 02:00 # −102

                   показать все, что скрытоКакая боль, какая боль.
                   Смотрите, у кого запас петухов оказался

                   Ответить

             • guest8 04.10.2019 14:34 # −999

               показать все, что скрытоvanished

               Ответить

               • guest8 04.10.2019 14:43 # −999

                 показать все, что скрытоvanished

                 Ответить

               • cmepmop 04.10.2019 14:49 # −102

                 показать все, что скрытоКогда обидят двухлетнего Элю, он говорит угрожающе:
                 – Сейчас темно сделаю!
                 И закрывает глаза, убеждённый, что благодаря этому весь мир погрузился во тьму.

                 Ответить

             • nymuHckuu_nemyx 04.10.2019 23:28 # −102

               показать все, что скрытоИ постинг на .хуй упал до изначальных двух ватников. Вот это самое главное достижение.
               
               На бывшей территории Палермо
               В заросшем лопухами огороде
               Они потом ругались все друг с другом,
               И не было в их жизни больше кайфа

               Ответить

   Добавить комментарий

   Ошибка компиляции комментария:

   1. Гости могут высказаться только в понедельник, среду, четверг или воскресение

   Я, guest, находясь в здравом уме и твердой памяти, торжественно заявляю:

   А не использовать ли нам bbcode?

   • [b]жирный[/b] — жирный
   • [i]курсив[/i] — курсив
   • [u]подчеркнутый[/u] — подчеркнутый
   • [s]перечеркнутый[/s] — перечеркнутый
   • [blink]мигающий[/blink] — мигающий
   • [color=red]цвет[/color] — цвет (подробнее)
   • [size=20]размер[/size] — размер (подробнее)
   • [code=<language>]some code[/code] (подробнее)

   Проверочный код: *