1. Куча / Говнокод #12614

    +133

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    drwxrwxrwx  1 wvxvw None       0 02-17 16:59 .svn
  -rw-rw-rw-  1 wvxvw None   22082 02-04 11:03 header.asp
  -rw-rw-rw-  1 wvxvw None   14331 02-04 11:02 header.utf.asp
  -rw-rw-rw-  1 wvxvw None   10333 02-04 11:01 header2.asp
  -rw-rw-rw-  1 wvxvw None   10368 02-04 11:02 header2_test.asp
  -rw-rw-rw-  1 wvxvw None   11825 02-04 11:02 header3.asp
  -rw-rw-rw-  1 wvxvw None   11734 02-04 11:03 header3_liran.asp
  -rw-rw-rw-  1 wvxvw None   11238 02-04 11:01 header3_old.asp
  -rw-rw-rw-  1 wvxvw None    7403 02-04 11:02 header3_ssl.asp
  -rw-rw-rw-  1 wvxvw None    9045 02-04 11:01 header3del.asp
  -rw-rw-rw-  1 wvxvw None   39451 02-04 11:02 header4.asp
  -rw-rw-rw-  1 wvxvw None   40224 02-04 11:02 header4_new.asp
  -rw-rw-rw-  1 wvxvw None   13348 02-04 11:02 header4rus.asp
  -rw-rw-rw-  1 wvxvw None     230 02-04 11:02 headers.asp
  -rw-rw-rw-  1 wvxvw None     208 02-06 09:37 headers.php

    Наследство.

    Запостил: wvxvw, 19 Февраля 2013

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

    • ava scriptin 19.02.2013 21:56 # +1

      Внезапно PHP!
      Ответить

      • ava wvxvw 19.02.2013 22:05 # +3

        Там еще где-то в недрах хранятся пару диэльэлей .Нетовских...

        Но вот вы будете смеятся, а я теперь зауважал ПХП, после знакомства с АСП классик написаном на ВиБиЭс, без единой функции: несколько мегабайт кода, ряды буков за рядами буков, но только If Else Then, только хардкор. Там даже человек на циклы свысока смотрел. Не признавал... такой мастер был...
        Ответить

        • ava wvxvw 19.02.2013 22:21 # +1

          Кстати, вот, еще, поспешу поделится моим диалогом с очевидцем, стоявшим, т.сказать у истоков:
          Вот понадобилось мне там какую-то страничку подправить, и телефонный номер вырезать из строки - долго мучался не мог понять, почему:
          Set re = new Regexp
With re Begin
  .Global = True
  .Pattern = "[0-9]{10}"
  Join(.Execute(SomeString), ",")
End With

          Падает с ошибкой.
          И когда я у него спросил, что за ...? Почему не работает? Он сморщися и сказал, что регулярки в ВиБиЭс - это для пижонов. Никто ими не пользуется. (Соответственно, find -name "*.asp" -exec grep -e 'Regexp' {} \; на примерно трех сотнях файлов выдает ноль совпадений).
          Ответить

          • ava 3.14159265 19.02.2013 22:31 # 0

            Хм. Я не сразу бейсик признал. Сначала подумал sort of asp LINQ.
            И Begin выглядит явно лишним.
            Ответить

            • ava wvxvw 19.02.2013 22:51 # 0

              Ну я все еще овладеваю современными технологиями, вот и лажа случается иногда. With вроде не сразу появился... с новым оно всегда так.
              Ответить

            • ava eth0 20.02.2013 19:08 # 0

              With почти нигде не используется, КМК. Илитный бейсик проступает сразу.
              Ответить

              • ava 3.14159265 20.02.2013 19:20 # 0

                >With почти нигде не используется
                Используется. Asp же. Тем более вы недооцениваете количество людей пишущих макросы в MS Office.
                Именно MS последние джва десятилетия вносит основную лепту в популяризацию сего языка.

                > With вроде не сразу появился
                Не менее 15 лет. Еще в 98 студии был.

                http://stackoverflow.com/questions/4174773/c-sharp-equivalent-for-visual-basic-keyword-with-end-with
                >You cannot do this in C#.
                Лол.
                Ответить

                • ava wvxvw 20.02.2013 21:06 # 0

                  Но вот, что правда, МС полностью и окончательно положили на classique. И их документация по ВБС подразумевает практически исключительно WSH, и нихера не работает в IIS.
                  Кстати, на сколько я понимаю, желающих попробовать код в примере не найдется, поэтому обьясню (Begin - это просто опечатка вызваная хроническим недосыпанием и лапшой быстрого приготовления), а фишка в том, что Execute возвращает уникальный массив, не такой, как все остальные массивы, и поэтому Join() на нем обламывается. Но, как уже говорилось, в ВБС регулярными выражениями не пользуются, поэтому никому это и не мешает.
                  Ответить

          • ava wvxvw 21.02.2013 19:11 # +1 

            Function RemoveQuotes2(s)
    dim i, s2
    s = trim(s)

    if len(s) = 0 then 
        RemoveQuotes2 = ""
        exit function
    end if

    s2 = ""
    for i = 1 to len(s)
        ch = mid(s, i, 1)
        if (asc(ch) < asc("0") or asc(ch) > asc("9")) and ch <> "," then
            ch = mid(s, i, 1)
        else
            s2 = s2 & ch
        end if
    next
    RemoveQuotes2 = s2
End Function


            О, кстати, нашел, автор оттачивал мастерство. Вот, практически запилил таки регулярку.
            Ответить

    • ava 3.14159265 19.02.2013 22:04 # 0

      >.svn
      Теперь понятно откуда такая нелюбовь к гиту.
      Ответить

      • ava wvxvw 19.02.2013 22:09 # +1

        ЭсВэЭн не мой, он там уже был, когда я пришел. Но Гит там ничего бы не исправил, даже, наоборот: вот видите, там есть такой файл header3_liran.asp - Лиран, это друган какой-то нашего мастера. Вот он видимо заглянул к нему на минутку и закодил еще один хидер. А был бы Гит? - там же все комьюнити собралось бы и поделилось нажитым.
        Ответить

    • ava Stallman 19.02.2013 22:23 # 0

      Доводилось работать с похожим пиздецом, только там хидеров, к счастью, было меньше, всего лишь четыре. Код в них был абсолютно идентичный, однако все четыре использовались на разных страницах.
      Ответить

    • ava roman-kashitsyn 19.02.2013 22:27 # +4

      Я тоже такое видел много раз. Особенно в похапешных проектах. Если человек не умеет пользоваться VCS, ему ни svn, ни git не помогут.
      Ответить

    • ava Lure Of Chaos 20.02.2013 01:11 # 0

      vcs in vcs, and we need to go deeper...
      Ответить

    • ava bormand 20.02.2013 05:50 # +9

      Декоративный SVN...

      - Надо заюзать систему контроля версий!
      ... прошло 2 года ...
      - А, так тут оказывается надо было коммитить. А я думал оно само версии контролирует.
      Ответить

    • ava myaut 20.02.2013 09:36 # 0

      Хедеры на все случаи жизни
      Ответить

    • ava RaZeR 20.02.2013 15:33 # +1

      Говнокод%2012614_Копия(2).htm
      Ответить

    • ava a282750 24.08.2021 22:16 # 0

      vanished
      Ответить

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