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

    +124

    1. 1
    https://docs.google.com/forms/d/1mhNCSYPqeLT7pXJEV_BpRkV1sdKJsPdJZcagSafOLVc/viewform

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

    scriptin, 10 Марта 2013

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

  2. Куча / Говнокод #12717

    +128

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    <style>
a img, input, #hndl-show-loginpass-fields, .checkout_buttons, #shipping-method-7, #shipping-method-6, #shipping-method-5,  #shipping-method-4,  #shipping-method-3, #shipping-method-2, #shipping-method-1, #payment-method-7, #payment-method-6, #payment-method-5, #payment-method-4, #payment-method-3, #payment-method-2, #payment-method-1, #payment-method-8, #payment-method-9, #payment-method-12
{
	border: 0;
}
</style>

    Отрыл в проекте заказчика вот такую строчку CSS :)

    invision70, 10 Марта 2013

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

  3. Куча / Говнокод #12702

    +140

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    #!/bin/bash
#
# Поздравляю с 8 марта! 
# Желаю море любви, блядь.
#

    8===o

    bot-minurast, 07 Марта 2013

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

  4. Куча / Говнокод #12697

    +125

    1. 1
    2. 2
    $ find . -type f -name '*.asp' -exec grep -nHi 'select \*' {} \; | wc -l
2160

    teh drama :(

    wvxvw, 06 Марта 2013

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

  5. Куча / Говнокод #12678

    +125

    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
    //сервер сайд (из colors.php)

$colors = [
    'banana'   => 'yellow',
    'orange'   => 'orange',
    'cucumber' => 'green'
];

echo $colors[$_GET['fruit']];


//клиент сайд (js)
var fruits = ['banana', 'orange', 'cucumber']
for (var i in fruits) {
    var fruit = fruits[i]
    $.get('colors.php?fruit='+fruit, function(color){
        document.write(fruit +' is '+ color +'<br/>')
    })
}

    Этот код показывают и задают вопрос почти на любом собеседовании на должность web-программита:
    Что здесь неверно и как это исправить?

    LispGovno, 02 Марта 2013

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

  6. Куча / Говнокод #12662

    +119

    1. 1
    Dummy commit for the sake of documentation (previous commit was made without a message)

    someone, 28 Февраля 2013

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

  7. Куча / Говнокод #12622

    +124

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    import Control.Applicative
import Data.List
isSimple n | n > 0 = not $ or $ map (\n1 -> n `rem` n1 == 0) [2..n-1]
isNaturalAndSimple n = n > 0 && isSimple n
generateSource b e = map (flip replicate $ [b..e]) [2..]
splitAll = groupBy $ \_ _->False
splitedNumberRangesToNumberSequence l = foldl (liftA2 (++)) (head l) (tail l)
toNumberSequences = map $ splitedNumberRangesToNumberSequence . map splitAll
onlySimple = map $ filter $ isNaturalAndSimple . sum
main = print $ take 4 $ onlySimple $ toNumberSequences $ generateSource 2 3

    HaskellGovno, 20 Февраля 2013

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

  8. Куча / Говнокод #12621

    +118

    1. 1
    2. 2
    fib = 0 : 1 : zipWith (+) fib (tail fib)
main = print $ take 700 fib

    HaskellGovno, 20 Февраля 2013

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

  9. Куча / Говнокод #12620

    +124

    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
    import Control.Monad
import Control.Arrow
import Data.List

solve' :: [String] -> [[String]]
solve' = nub . filter (
            and . uncurry (
                zipWith (
                    (.head) . (==) . last
                )
            ) . (id &&& tail)
         ) . uncurry ($) . (
            last . (((
                map (
                    last . fst &&& uncurry (++) . (init . fst &&& snd)
                ) . tail . uncurry (zipWith (,)) . (inits &&& tails)
            ) >=> (uncurry map) . 
                ((:) *** solve')
            ):
            ) . (uncurry takeWhile) . (
                    const . null &&& const [const [[]]]
                ) &&& id
         )

main = print $ solve' ["123","321","123"]

    HaskellGovno, 20 Февраля 2013

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

  10. Куча / Говнокод #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)