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

    +130

    1. 1
    2. 2
    3. 3
    4. 4
    Ахтунг!
    что за потоп на уютненьком говнокодике?
    
    кто-то всеми виртуалами топит все говнокоды.

    извиняюсь, что топик не с кодом, но, наверное, событие масштабное.

    просьба высказаться.

    Lure Of Chaos, 29 Июля 2011

    Комментарии (49)
  2. Куча / Говнокод #7366

    +147

    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
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    Отчего мой комп дымится?
    Отчего летит искра?
    Вроде куллеры на месте
    И все целы провода,
    И не скачет напряженье.
    Что же с ним, родным, не так?
    Очень просто - посмотрите:
    В нём играется кошак!
    Ах ты ж подлая скотина!
    Ах ты вшивый пидорас!!
    Вылезай оттуда, падла!!!
    Комп подох. Котёнка спас.
    Неужели так судьбою
    Уготована мне месть?
    Я вчера, совсем случайно,
    Не дал кошаку поесть.
    Мозги в черепке с ушами,
    Разработав верный план,
    Доказали, что процессор -
    И котёнку по зубам!
    Выпил водки, взял заначку,
    Молча прусь я в магазин...
    Не забудьте о подкормке
    Своих маленьких скотин!

    =)

    vkontakte, 28 Июля 2011

    Комментарии (9)
  3. Куча / Говнокод #7333

    +146

    1. 1
    http://dl.dropbox.com/u/24195734/gets/govnoget7333.png

    Гет, нах

    KirAmp, 25 Июля 2011

    Комментарии (10)
  4. Куча / Говнокод #7332

    +146

    1. 1
    Я заебался жать на рефреш весь долбанный день со всех устройств, чтобы запостить гет

    KirAmp, 25 Июля 2011

    Комментарии (5)
  5. Куча / Говнокод #7321

    +147

    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
    16. 16
    17. 17
    18. 18
    Рефакторинг всего сайта. 
    
    В html:
    <a class="gal" href="ссылка">
    	<p><img width="96" height="63" alt="" src="image.jpg"></p>
    	<p>Название</p>
        </a>
    
    В админке уже сделал ресайс изображений! 
    
    И вдруг оказывается  в CSS:
    .gal img {
      border: 1px solid #F4EDDC;
      display: block;
      height: 100px;
      margin: 0 auto;
      width: 160px;
    }

    Изменить дело 5 сек.. Но зло берет.

    De-Luxis, 23 Июля 2011

    Комментарии (8)
  6. Куча / Говнокод #7311

    +147

    1. 1
    2. 2
    3. 3
    <?
    	out_banner_java(); // Выводим Java Script для слайдера
    ?>

    De-Luxis, 22 Июля 2011

    Комментарии (10)
  7. Куча / Говнокод #7288

    +127

    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
    16. 16
    <HTML>
    <HEAD>
    <TITLE>Free Web Graphics - Buttons, Backgrounds, Dividers, Bullets...</TITLE>
    <meta name="author" content="EverEden Design">
    <TITLE>Contact Us </TITLE>
    </HEAD>
    <BODY BGCOLOR="FFFFFF" BODY BACKGROUND="/images/whstuccobk2.gif" TEXT="#003333" LINK="#660033" VLINK="#003333" ALINK="#660033">
    ...
    <HTML>
    <HEAD>
    <TITLE>Contact Information</TITLE>
    </HEAD>
    <BODY BGCOLOR="#FFFFFF" TEXT="#990066" LINK="#006633" VLINK="#339900">
    ...
    </BODY>
    </HTML>

    Эта страница была сделана явно для проверки HTML-парсеров=)
    http://www.graphics-4free.com/contact.html

    KIRK, 19 Июля 2011

    Комментарии (2)
  8. Куча / Говнокод #7285

    +132

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    #                <connection id="ftp_cpe02">
    #                        <user value="*****" />
    #                        <password value="*****" />
    #                        <host value="*********" />
    #                        <passive value="true" />
    #                        <path value="/var/logs" />
    #                </connection>

    Новый опус от техподдержки.
    Раздел как бэ закомментирован

    SadKo, 19 Июля 2011

    Комментарии (2)
  9. Куча / Говнокод #7277

    +137

    1. 1
    2. 2
    3. 3
    -define(NO_AGE_GROUP, "0").
    -define(BELOW_18, "1").
    -define(ABOVE_18, "2").

    Это Erlang если что...
    Если не в курсе, то двойные кавычки в Erlang это короткая запись создания списка, естественно, как списки эти константы никогда не используются.

    wvxvw, 18 Июля 2011

    Комментарии (15)
  10. Куча / Говнокод #7230

    +132

    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
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82
    open System.Net
    open System.Text.RegularExpressions
    open System.Text
    open System
    
    type userInfo = 
        { User : string;
          Rating : double;}
    
    let  mutable Users  = []
    
    (* Заполняем списки юзверей *)
    let getUsersInfo s = 
        let mutable  m = Regex.Match(s, @">(?<user>[^<]+)</a></td>\s+<td class=""strength"">[^<]+</td>\s+<td class=""rating""><strong>(?<rating>[^<]+)") //+ Оптимизировать регулярку. (Page 2)
        while(m.Success) do
            let info = {User = m.Groups.["user"].Value;  Rating =  m.Groups.["rating"].Value |> double}
            Users <- Users @ [info]
            m <- m.NextMatch()
        
    (* скачивание страницы по индексу *)
    let getSourceForUsers p = 
        let url = "http://freehabr.ru/people/good/page" + string(p)
        let wc = new WebClient();
        let s = wc.DownloadString(url);
        printfn "Разобрана %i страница" p
        getUsersInfo s
    
    (* получить индекс последней страницы *)    
    let getLastPage =  
        let wc = new WebClient()
        wc.Encoding <- Encoding.UTF8
        let s = wc.DownloadString "http://freehabr.ru/people/"
        Regex.Match(s,@"(?<=e)\d+(?=/"">п)").Value |> int
    
    let lastPage = getLastPage
    
    let printList a =
        a |> List.iter (fun x -> printfn "%s рейтинг - %.2f" x.User x.Rating)
        Console.ReadKey() |> ignore
     
    [<EntryPoint>]
    let main(args:string[]) =
      printfn "Парсер юзерей с положительным (или нулевым) рейтингом"
      printfn "%i -- Количество страниц" lastPage
      printfn "scan --XX - __ Cбор списка пользователей от первой страницы до XX"
      printfn "scan --YY --XX __ Сбор списка пользователей от YY страницы до XX. \nXX не может быть больше, чем максимальное количество страниц в списках юзеров с положительной кармой"
    
      let userInput = Console.ReadLine();
      match userInput with
      | _ when userInput.StartsWith "scan --" -> let a = Regex.Split(userInput,"--")
                                                 let dig = a.[1] |> int
                                                 if a.Length = 2 then  // для первого варианта                                               
                                                    [1 .. dig] 
                                                    |> List.iter getSourceForUsers
                                                 else // для второго
                                                    [ dig .. a.[2] |> int ] 
                                                    |> List.iter getSourceForUsers
                                                 printfn "~~~\nЮзеры посчитаны"
                                                    
                                              
      | _ -> printfn "Завершение приложения"
             exit(1) 
      
      printfn "~~~~\nОбработка списка\n~~~~"
      printfn "usersGreaterRate --XX __ Показать пользователей,\nу которых рейтинг больше или равен XX"
      printfn "usersLessRate --XX __ Показать пользователей,\nу которых рейтинг меньше или равен XX"
      printfn "usersWithNamesBegins --String __ Показать пользователей,\nу которых имя начинается со строки String"
      let usersOper = Console.ReadLine()
      let param = Regex.Split(usersOper," --").[1] 
      match usersOper with
      | _ when usersOper.StartsWith "usersGreaterRate --" -> Users 
                                                             |> List.filter (fun x -> x.Rating > (param |> double))
                                                             |> printList
      | _ when usersOper.StartsWith "usersLessRate --" -> Users
                                                          |> List.filter (fun x -> x.Rating < (param |> double))
                                                          |> printList
      | _ when usersOper.StartsWith "usersWithNamesBegins --" -> Users
                                                                    |> List.filter (fun x -> x.User.StartsWith param)
                                                                    |> printList
      | _ -> printfn "Завершение приложения"
             exit(1) 
      0

    qbasic, 12 Июля 2011

    Комментарии (23)