1. Java / Говнокод #1422

    +145.5

    1. 1
    2. 2
    String labOrderOrMrnParam = (null == order)
             ? order.getMayoAccessNumber() : order.getOrderNumber();

    Что же делать если объект - null

    guest, 26 Июля 2009

    Комментарии (4)
  2. Ruby / Говнокод #1421

    −83

    1. 1
    @archive	= File.open(File.expand_path(__FILE__), "rb"){|f| f.read}.gsub(/\r/, "").split(/\n\n/)[-1].split("\n").collect{|s| s[2..-1]}.join("\n").unpack("m").shift

    Жесть

    guest, 26 Июля 2009

    Комментарии (1)
  3. PHP / Говнокод #1419

    +148

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    25/07 21:53]Л@мEp 
    // $file - array 
    $b = array(); 
    $b[0] = $file[2]; 
    $b[1] = $file[3]; 
    $file[2] = $b[1]; и тд. Такая глупость взбрела . Файлы сакс аще

    Вот такое вот заменение части масива

    guest, 25 Июля 2009

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

    +142

    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
    NameVirtualHost 127.0.0.1:80
    
    <VirtualHost 127.0.0.1:80>
        ServerAdmin webmaster@localhost
        ServerName site.net
        ServerAlias www.site.net
        DocumentRoot /home/test/www/site.net
        ErrorLog /var/log/apache2/error.log
        LogLevel warn
        CustomLog /var/log/apache2/access.log combined
    </VirtualHost>
    
    <VirtualHost 127.0.0.1:80>
        ServerAdmin webmaster@localhost
        ServerName sub.site.net
        ServerAlias www.sub.site.net
        DocumentRoot /home/test/www/sub.site.net
        ErrorLog /var/log/apache2/error.log
        LogLevel warn
        CustomLog /var/log/apache2/access.log combined
    </VirtualHost>

    Виртуал хост апатча..

    guest, 25 Июля 2009

    Комментарии (1)
  5. Perl / Говнокод #1417

    −150

    1. 1
    print $string =~ /([http|ftp|https]+:\/\/[\w\/\.\?\&\=]+)/;

    Типичный индусский регэксп (в данном случае ищет УРЛ в строчке)

    guest, 25 Июля 2009

    Комментарии (2)
  6. PHP / Говнокод #1416

    +149

    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
    if(!$isfileex)
    {
        //Если файла с кешем не существует, сгенерировать код.
        if($filecache=="")
        {
            $temp=$filecontent;
        }else
        {
            $temp = file_get_contents($filecache);
        }
    }
    
    /*$datacontent ="ура товарищи";*/
    /*--------------*/
    if(!$isfileex)
    {
       if($datacontent==""){
       $temp=shablonning($temp,$name);}
       else{
       $temp=$datacontent;}
    }

    guest, 24 Июля 2009

    Комментарии (0)
  7. PHP / Говнокод #1415

    +153

    1. 1
    2. 2
    3. 3
    //я не индийский кодер, просто обновляем переменные сессии, чтобы не экспайрились
    $_SESSION['login'] = $_SESSION['login'];
    $_SESSION['authstring'] = $_SESSION['authstring'];

    guest, 24 Июля 2009

    Комментарии (4)
  8. PHP / Говнокод #1414

    +151

    1. 1
    @$sel = $_POST["sel"]?$_POST["sel"]:$_GET["sel"];

    из огромной кучи (продолжение следует)

    guest, 24 Июля 2009

    Комментарии (7)
  9. Perl / Говнокод #1413

    −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
    if (!@ARGV){
        die ("Usage: palindrom.pl word\n");
    }
    $text = $ARGV[0];
    if (length($text) < 4){
        die ("Error: Word must be not less than 4 leters\n");
    }
    if ($text =~ m/(.)(.). ?\2\1/){
        print "Result: Match\n";
    }
    else{
        print "Result: Not match\n";
    }

    Код как-бэ проверяет является ли слово палиндромом.
    На самом деле проверяются только первые два символа с начала и конца. То есть строка "alla123h5vj3galla" является палиндромом.

    guest, 23 Июля 2009

    Комментарии (2)
  10. Perl / Говнокод #1412

    −237.4

    1. 1
    print "Content-type: text/plane \n\n";

    текст/самолёт

    Собсно, тут даже Перл ни при чем, просто улыбнуло...

    guest, 23 Июля 2009

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