-
+131.9
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
np_char=`awk '{
for(i=1;i<=length($0);i+=1){
symb=substr($0,i,1);
if (symb < " ")
{
print symb;
exit 9;
}
}}' $1`
hex_code=`echo "$np_char" | hexdump -n 1 -e '1/1 "%X" "\n"'`
Поиск и вывод непечатных символов в файле...
Это я еще молчу об этической стороне hexdump.
nil,
16 Ноября 2009
-
+138.5
- 1
awk '{i=i+1;if(i==2){print($3);}}' 2>/dev/null | awk -F. '{printf $1$2$3}'
Продолжаю посылать приколы нашего городка.
Кстати, предложение к разработчикам ресурса: ввести "язык" POSIX.2, или, скажем, "язык командной строки UNIX". Куда пойдут все конвееры с sed, awk, join, cut, группировками, подпроцессами, асинхронностью и прочим. Они порой доставляют!
Не пихать же это все в bash!
nil,
06 Ноября 2009
-
+65.2
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
function kub1
parameters kod
dimension a(16),b(16)
for i=16 to 1 step -1
a(i)=mod(kod,10)
kod=kod/10
kod=int(kod)
endfor
for i=1 to 16 step 1
if a(i)=0
else
n=i
exit
endif
endfor
for i=n to 16 step 1
b(i-(n-1))=a(i)
endfor
k=b(5)
return k
В принципе, пример относится к FoxPro, но так как я не обнаружил его в списке доступных языков при добавлении говнокода, пришлось остановиться на "куче" :) Наткнулся на этот фрагмент недавно при исследовании чужого исходника под Visual Foxpro. Привожу его в первозданном (с учетом форматирования) виде. Весь фрагмент можно было бы заменить на какое-нибудь
FUNCTION kub1
PARAMETERS kod
RETURN SUBSTR(ALLT(STR(kod)),5,1)
но автор, видимо, счел нужным не упрощать себе жизнь :)
ps. Кстати, а как тут в описании код культурно отформатировать ? А то у меня тоже всё влево съехало :)
tvolf,
30 Октября 2009
-
+138.7
- 1
Что бы познать рекурсию надо познать рекурсию.
dim1r,
30 Октября 2009
-
+144.6
- 1
- 2
Правило всегда одно:
Нет unit-тестов - код - говно.
bniwredyc,
26 Октября 2009
-
+75.3
- 1
- 2
- 3
<meta http-equiv="Тип-содержимое" content="text/html; charset=windows-1251"><meta http-equiv="Тип-содержимое" content="text/html; charset=windows-1251">
<meta http-equiv="Тип-содержимое" content="text/html; charset=windows-1251"><meta http-equiv="Тип-содержимое" content="text/html; charset=windows-1251">
<meta http-equiv="Тип-содержимое" content="text/html; charset=windows-1251"><meta http-equiv="Тип-содержимое" content="text/html; charset=windows-1251"><meta http-equiv="Тип-содержимое" content="text/html; charset=windows-1251">
Случайно открыл исходный код заглавной страницы сайта utel.tv, а там вот так указывают Content-Type, видимо чтобы непонятливые браузеры поняли хотя-бы с седьмого раза. Может объяснить им, что тип контента это конечно оно, но не туда? :)
eveel,
20 Октября 2009
-
+134.7
- 1
- 2
- 3
- 4
Настоящая шиза - это когда ты сидишь часами и придумываешь говнокод по извращённей,
только для того что бы выложить его на govnokod.ru
:)
переделка одной цитаты с баша (с)
nico-izo,
11 Октября 2009
-
+89.4
- 1
- 2
- 3
- 4
- 5
- 6
- 7
<option name="d">
<select value="collection">Коллекции</select>
<select value="cash">В наличии</select>
<select value="documents">Выставки</select>
<select value="bio">Биография</select>
<select value="int">Интерьер</select>
</option>
HTML без комментариев) Я валялся от смеха, когда увидел :D
greevex,
30 Сентября 2009
-
+65.2
- 1
perl -MIO::All -e 'print io("-index-.cgi")->all' > index.dev.cgi
А как ещё скопировать файл начинающий на -?
Suor,
30 Сентября 2009
-
+65
- 1
- 2
- 3
<div class="frame" style="width: 298px;//width: 350px;//padding-left: 20px;">
<!-- Content -->
</div>
Да-да, именно так, со слешами, в рабочем проекте и есть. решил не трогать
Shock,
30 Сентября 2009