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

    −124

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    > cat 1.pl
    $owner = "Jack";
    print "This is $owner\n";
    print "This is $owner's house\n";
    >  perl 1.pl
    This is Jack
    This is  house

    The old package delimiter was a single quote, but double colon is now the preferred delimiter, in part because it's more readable to humans, and in part because it's more readable to emacs macros. It also makes C++ programmers feel like they know what's going on--as opposed to using the single quote as separator, which was there to make Ada programmers feel like they knew what was going on. Because the old-fashioned syntax is still supported for backwards compatibility, if you try to use a string like "This is $owner's house" , you'll be accessing $owner::s ; that is, the $s variable in package owner , which is probably not what you meant. Use braces to disambiguate, as in "This is ${owner}'s house" .

    Запостил: bormand, 21 Июня 2012

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

    • показать все, что скрытоКГ/АМ! (спойлер: ОП - ХУЙ!)
      Ответить
    • в доме, который построил Джек....
      Ответить
    • One week messing with perl...
      Ответить
    • PerlGovno
      Ответить
    • показать все, что скрытоЯзык программирования Ada
      Ответить
    • http://ideone.com/wQGNX
      Выкидывает целых два варнинга.
      Ответить
      • Всем похуй
        Ответить
      • Да хоть пять :) Суть то не в том, что этот код не пашет, а в том, что в пёрле есть забавные фишки типа именования пакетов от Ады.
        Ответить
        • В перле есть все! А студент проигнорировал совет снутри двойных кавычек маскировать все сомнительные символы бэкслэшем. Лох, вощем
          Ответить
          • > А студент проигнорировал
            Никто ничего не игнорировал, просто я сидел, раскуривал ман по пакетам в перле, и случайно наткнулся на этот параграф. По-быстрому составил пример, иллюстрирующий эту особенность пёрла, и выложил сюда.

            > Лох, вощем
            Все люди когда-нибудь ошибаются... И когда вы ошибетесь, вам, безусловно, будет приятно услышать "лох вощем".
            Ответить
            • Та не.. Все нормально. Нормальный код. Смешной
              Ответить
      • А мне «Ideone» говорит, что раствор не найден.
        Ответить
    • Не знал, что борманд перлоёб.
      Ответить
      • Не то чтобы мне нравился пёрл, но для разовой хуйни для парсинга каких-нибудь текстовичков было ваще норм.
        Ответить
        • ты не поверишь но его для того и создавали
          practical extraction and report language не виноват что вебпрограммисты времен веб 1.0 стали писать на нем лайвджорналы и пиздеть что он для этого не подходит
          Ответить
    • blast from the past, плевок в вечность, лол
      Ответить
    • #!/usr/bin/perl -w
      use strict;
      use warnings;
      
      package Petukh;
      our $s = 'belongs to petookh';
      
      package main;
      
      print $Petukh's;

      пиздато
      Ответить
      • #!/usr/bin/perl -w
        use strict;
        use warnings;
        
        package Petukh;
        our $s = 5;
        
        package main;
        
        my $Petukh = 2 + 2;
        
        print $Petukh, ' is ', $Petukh's;


        https://ideone.com/hZGDLk
        Ответить
        • Будь любезен, передай своему "Свиборгу" моё пожелание, чтобы его кошка, параллельно с оригиналами говнокодов, предоставляла так же переводы на "PHP". Заранее спасибо.
          Ответить

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