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

    −103

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    use Carp qw(carp cluck croak confess);

carp "warning";
cluck "warning with backtrace";
croak "fatal error";
confess "fatal error withbacktrace";

    Говорящие имена функций такие говорящие придирчивые, кудахтающие, каркающие, исповедывающиеся...

    Запостил: bormand, 28 Января 2014

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

    • ava Dummy00001 28.01.2014 14:59 # +1

      http://en.wiktionary.org/wiki/Category:English_onomatopoeias -

      croak: The cry of a frog or toad. (see also ribbit)

      PS не знал что у 'carp' есть еще и официальный перевод.
      Ответить

      • ava bormand 28.01.2014 15:45 # 0

        Есть еще вот такой вариант: croak - pass from physical life and lose all bodily attributes and functions necessary to sustain life

        Кстати вороны у них, емнип, тоже croak'ают.
        Ответить

        • ava roman-kashitsyn 28.01.2014 15:51 # +1

          Perl. Не каркай, а то не взлетит!
          Ответить

        • ava Dummy00001 28.01.2014 16:27 # +1

          > Кстати вороны у них, емнип, тоже croak'ают.

          Англиское название птицы есть само по себе уже ономатопея.

          Другими словами, в англиском, "crow is crowing".
          Ответить

    • ava guest 28.01.2014 17:41 # +1

      Литературненько. Как раз по-перловски.
      Ответить

    • ava guest 28.01.2014 17:57 # +1 

      shits "code problem";
      Ответить

      • ava dionys 28.01.2014 20:51 # +2

        Легко:
        use Exporter::Renaming;
use Carp Renaming => [confess => 'shits'];
no Exporter::Renaming;

shits "code problem";
        Ответить

        • ava Klopp 28.01.2014 21:46 # 0

          Зачем лишние модули?

          use Carp qw/confess/;
sub shits($);

shits "Yo!";

sub shits($) { confess shift; }


          :-)
          Ответить

        • ava Elvenfighter 29.01.2014 00:03 # 0

          Чуть нативнее:
          use Carp ();
*shits = *Carp::confess;
shits("code problem");

          http://ideone.com/kIz6CJ
          Ответить

          • ava Klopp 29.01.2014 00:33 # 0

            Скобки так не убрать :)

            P.S. Но с прототипом 'sub shits($)'...
            Ответить

            • ava Elvenfighter 29.01.2014 14:53 # 0

              Прототипы perlcritic (pbp) не оценит
              Ответить

              • ava Klopp 29.01.2014 15:19 # 0

                Да всё по большому счёту фигня.
                Но есть разница, между gcc -Wall
                и :)
                Ответить

    • ava someone 28.01.2014 21:00 # +3

      Carpe diem!
      Ответить

    • ava roman-kashitsyn 29.01.2014 09:53 # +2

      Борманд, опомнись, пока не поздно. Юзай питон.
      Ответить

    • ava Lure Of Chaos 29.01.2014 16:19 # 0

      ко-ко-ко же.
      Ответить

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