- 1
factory.getObject().getFactory().getObject().getFactory....
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+76.5
factory.getObject().getFactory().getObject().getFactory....
вот такая интересная конструкция встретилась:)
−124.6
Function DosToKoi ( TextBlock )
FOR TXB = 1 TO LEN( TextBlock )
Select Case Asc( Mid( TextBlock, TXB, 1 ) )
Case 192 DosToKoi = DosToKoi & Chr(225)
Case 193 DosToKoi = DosToKoi & Chr(226)
Case 194 DosToKoi = DosToKoi & Chr(247)
Case 195 DosToKoi = DosToKoi & Chr(231)
Case 196 DosToKoi = DosToKoi & Chr(228)
Case 197 DosToKoi = DosToKoi & Chr(229)
Case 168 DosToKoi = DosToKoi & Chr(179)
Case 198 DosToKoi = DosToKoi & Chr(246)
Case 199 DosToKoi = DosToKoi & Chr(250)
Case 200 DosToKoi = DosToKoi & Chr(233)
Case 201 DosToKoi = DosToKoi & Chr(234)
Case 202 DosToKoi = DosToKoi & Chr(235)
Case 203 DosToKoi = DosToKoi & Chr(236)
Case 204 DosToKoi = DosToKoi & Chr(237)
Case 205 DosToKoi = DosToKoi & Chr(238)
Case 206 DosToKoi = DosToKoi & Chr(239)
Case 207 DosToKoi = DosToKoi & Chr(240)
Case 208 DosToKoi = DosToKoi & Chr(242)
Case 209 DosToKoi = DosToKoi & Chr(243)
Case 210 DosToKoi = DosToKoi & Chr(244)
Case 211 DosToKoi = DosToKoi & Chr(245)
Case 212 DosToKoi = DosToKoi & Chr(230)
Case 213 DosToKoi = DosToKoi & Chr(232)
Case 214 DosToKoi = DosToKoi & Chr(227)
Case 215 DosToKoi = DosToKoi & Chr(254)
Case 216 DosToKoi = DosToKoi & Chr(251)
Case 217 DosToKoi = DosToKoi & Chr(253)
Case 220 DosToKoi = DosToKoi & Chr(248)
Case 219 DosToKoi = DosToKoi & Chr(249)
Case 218 DosToKoi = DosToKoi & Chr(255)
Case 221 DosToKoi = DosToKoi & Chr(252)
Case 222 DosToKoi = DosToKoi & Chr(224)
Case 223 DosToKoi = DosToKoi & Chr(241)
Case 224 DosToKoi = DosToKoi & Chr(193)
Case 225 DosToKoi = DosToKoi & Chr(194)
Case 226 DosToKoi = DosToKoi & Chr(215)
Case 227 DosToKoi = DosToKoi & Chr(199)
Case 228 DosToKoi = DosToKoi & Chr(196)
Case 229 DosToKoi = DosToKoi & Chr(197)
Case 184 DosToKoi = DosToKoi & Chr(163)
Case 230 DosToKoi = DosToKoi & Chr(214)
Case 231 DosToKoi = DosToKoi & Chr(218)
Case 232 DosToKoi = DosToKoi & Chr(201)
Case 233 DosToKoi = DosToKoi & Chr(202)
Case 234 DosToKoi = DosToKoi & Chr(203)
Case 235 DosToKoi = DosToKoi & Chr(204)
Case 236 DosToKoi = DosToKoi & Chr(205)
Case 237 DosToKoi = DosToKoi & Chr(206)
Case 238 DosToKoi = DosToKoi & Chr(207)
Case 239 DosToKoi = DosToKoi & Chr(208)
Case 240 DosToKoi = DosToKoi & Chr(210)
Case 241 DosToKoi = DosToKoi & Chr(211)
Case 242 DosToKoi = DosToKoi & Chr(212)
Case 243 DosToKoi = DosToKoi & Chr(213)
Case 244 DosToKoi = DosToKoi & Chr(198)
Case 245 DosToKoi = DosToKoi & Chr(200)
Case 246 DosToKoi = DosToKoi & Chr(195)
Case 247 DosToKoi = DosToKoi & Chr(222)
Case 248 DosToKoi = DosToKoi & Chr(219)
Case 249 DosToKoi = DosToKoi & Chr(221)
Case 252 DosToKoi = DosToKoi & Chr(216)
Case 251 DosToKoi = DosToKoi & Chr(217)
Case 250 DosToKoi = DosToKoi & Chr(223)
Case 253 DosToKoi = DosToKoi & Chr(220)
Case 254 DosToKoi = DosToKoi & Chr(192)
Case 255 DosToKoi = DosToKoi & Chr(209)
Case Else DosToKoi = DosToKoi & Mid( TextBlock, TXB, 1 )
End Select
NEXT
End Function
+124.3
[ $(echo $a|cut -c$((${#a}-1))-) = "gz" ] && echo "Hello, world!"
[ $(echo $a|sed "s/.*\(..\)/\1/") = "gz" ] && echo "Hello, world!"
echo $a|sed -e"s/.*gz$/Hello, world\!/" -et -eD
expr $a : .*gz >/dev/null && echo "Hello, world!"
[ $(expr $a : '.*\(..\)') = "gz" ] && echo "Hello, world!"
echo "ifelse(substr($a,eval(len($a)-2)),gz,\`Hello, world! ')"|m4
case $a in *gz) echo "Hello, world!";; esac
echo $a|emacs -batch -eval '(defun f (arg) "M") (if (string= (substring arg -2) "gz") (princ "Hello, world!\n")) )' -f f
2168-му посвящается...
Задача: Если последние два символа переменной "gz", то вывести "Hello, world!".
Решение проблемы от поклонников разных инструментов. awk, perl и всякие tcl не писал, поскольку там не будет говнокода.
11 строка, то, как обычно пишу я. ИЧСХ, все примеры, кроме последнего, строго соответствуют POSIX.2:)
−862.7
--...END OF STORED PROCEDURE...
-- WORK Table
DELETE FROM S_CLD011
DELETE FROM S_COLOR
DELETE FROM S_CONTRACT
DELETE FROM S_CONVERT
DELETE FROM S_DEALER
DELETE FROM S_DIV021
DELETE FROM S_HISTORY
DELETE FROM S_LOOKUP
DELETE FROM S_MODEL
DELETE FROM S_OPTION
DELETE FROM S_PAYINV
DELETE FROM S_PIV011
DELETE FROM S_PIV021
DELETE FROM S_PRICE
DELETE FROM S_PORT
DELETE FROM S_REG075
DELETE FROM S_SDS021
DELETE FROM S_SERIES
DELETE FROM S_SIS021
DELETE FROM S_STATUS
DELETE FROM S_SUPPLIER
DELETE FROM S_SYS021
DELETE FROM S_USER
CLOSE c1
DEALLOCATE c1
CLOSE c1V
DEALLOCATE c1V
CLOSE c2
DEALLOCATE c2
CLOSE c2V
DEALLOCATE c2V
а таблички так в базе и висят... куча пустых табличек
+161.5
<textarea id="some_id" onclick="document.getElementById('some_id').select()">...</textarea>
+92.8
procedure MyLine(X1, Y1, X2, Y2: Integer; Color: TColor; Canvas: TCanvas);
begin
if (Abs(X1 - X2) <= 1) and (Abs(Y1 - Y2) <= 1) then
Canvas.Pixels[X1, Y1] := Color
else
begin
MyLine(X1, Y1, (X1 + X2) shr 1, (Y1 + Y2) shr 1, Color, Canvas);
MyLine((X1 + X2) shr 1, (Y1 + Y2) shr 1, X2, Y2, Color, Canvas);
end;
end;
Когда-то давно очень увлекался рисованием в ДОС-е.
До сих пор помню процедуру быстрого рисования кривой прямой %)
представляю на суд тот же алгоритм.
+165.1
<?php
...
define ( "CSELECT", "select task.value as tvid, count(*) as cnt from ( " );
define ( "CJOIN", " ) as s1
left join m_dict on s1.id_m_dict = m_dict.id " );
define ( "CWHERE", " where task_attr.id_mf = 116
and task_attr.value <> 'Дело'
group by task_attr.value" );
...
$sqltext = CSELECT . "select id, id_dep, id_m_dict
from task
where task.state = 0 and
task.startdate <= '" . $reportDate . " 23:59:59' and
task.id_dep in (2,42) and
task.id_m_dict = 29
" . CJOIN . CWHERE;
...
?>
Я может чего-то не понимаю и так писать круто, но когда этих $sqltext = ... больше 5, то извините, это капец.
−873.1
select dbms_random.value from dual connect by level<=1000
выбрать всякую фикню из неоткуда (Оракл)
−867
-- PL SQL code
function quote(s varchar2)return varchar2 is
begin
return replace(s,'''','''''');
end;
ох уж эти ковычки ...
+149.6
switch ($menu_item["id"]){
default:
$page = "content.html";
}
Обнаружил в проекте который мне достался по наследству ))