Страница 2 из 2
Re: "Шедевры" программерской мысли
Добавлено: 14 ноя 2007, 17:24
Хыиуду
Кусок кода на Перле, который очень напоминает музыку из мультика "Розовая Пантера"
my @param = $r->param();
my %param;
foreach my $param (@param)
{ $param{$param} = $r->param($param);
}
Re: "Шедевры" программерской мысли
Добавлено: 10 янв 2009, 16:37
Хыиуду
Bool IsNumber (string str) {
return (str.Replace ("0", "").Replace ("1", "").Replace ("2", "").Replace ("3", "").Replace ("4", "").Replace ("5", "").Replace ("6", "").Replace ("7", "").Replace ("8", "").Replace ("9", "").Length == 0);
}
В каждой шутке...
Добавлено: 11 янв 2009, 09:51
BBB
Хыиуду писал(а):Bool IsNumber (string str) {
return (str.Replace ("0", "").Replace ("1", "").Replace ("2", "").Replace ("3", "").Replace ("4", "").Replace ("5", "").Replace ("6", "").Replace ("7", "").Replace ("8", "").Replace ("9", "").Length == 0);
}
Будете смеятся (а, может, не будете), но на PL/SQL именно так и проверяется.
Код: Выделить всё
function IsInteger (pValue in varchar2) return boolean
is
begin
return (translate (pValue,'$1234567890','$') is null);
end; -- IsInteger
Вот, я даже одну из ссылок, где нашел "первоисточник", сохранил:
http://www.sql.ru/forum/actualthread.aspx?tid=385100
Re: "Шедевры" программерской мысли
Добавлено: 12 янв 2009, 13:21
demon416
Локальную версию
http://thedailywtf.com/ делаете?))))
Re: "Шедевры" программерской мысли
Добавлено: 12 янв 2009, 13:47
Duncon
Как это расценить? Флуд? Ркеклама?
Что сделать? - заблочить юзера..
Re: "Шедевры" программерской мысли
Добавлено: 13 янв 2009, 00:24
demon416
Как флейм в разделе флейма
да и не реклама это просто все эти "шедевры" я уже видел
поэтому и написал где
банить изза одного сообщения - жестко однако
Re: "Шедевры" программерской мысли
Добавлено: 14 янв 2009, 10:36
Игорь Акопян
ну я бы к примеру не стал открывать ссылку с очень неоднозначным названием.... предлагаю просто удалить сообщения 14-17 как офтопик
Re: "Шедевры" программерской мысли
Добавлено: 09 фев 2009, 13:13
atavin-ta
" писал(а):PUSH AX
POP AX
Это вместо двух NOPов наверное. А как вам такая DOS оболочка:
Код: Выделить всё
1 cls
2 open #3, "progs.#": input #3,n: pn$(n): for i=1 to n step 1:
3 input #3,pn(i): print pn(i), :next i
4 input n: merge pn(n)+".b":goto 20
?
Особенно обратите внимание на конец 2-ой строки. Для чего по вашему там двоеточие?
И нафига вводить числовой номер программы, если список программ уже валяется на экране? И ко всему прочему надо было отдельно вручную сформировать файл с именами программ и сохранить его на диске.
Re: "Шедевры" программерской мысли
Добавлено: 28 мар 2009, 21:45
Albor
Шедевр от Microsoft. Что может подумать нормальный человек о функции, представленной таким прототипом?
Код: Выделить всё
int CRichEditCtrl::LineLength(int nLine = -1) const;
Правильно. Функция возвращает длину строки, номер которой передаётся как параметр. Но, не тут то было. Как оказалось, под именем
nLine кроется индекс символа в тексте. Что обидно, за пару дней до использования оной, почитал MSDN и отметил для себя несоответствие, но... вылетело из головы. За что и поплатился - мучил дебаггер, пока не въехал в чём дело.