- 1
- 2
- 3
- 4
Ахтунг!
что за потоп на уютненьком говнокодике?
кто-то всеми виртуалами топит все говнокоды.
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+130
Ахтунг!
что за потоп на уютненьком говнокодике?
кто-то всеми виртуалами топит все говнокоды.
извиняюсь, что топик не с кодом, но, наверное, событие масштабное.
просьба высказаться.
+147
Отчего мой комп дымится?
Отчего летит искра?
Вроде куллеры на месте
И все целы провода,
И не скачет напряженье.
Что же с ним, родным, не так?
Очень просто - посмотрите:
В нём играется кошак!
Ах ты ж подлая скотина!
Ах ты вшивый пидорас!!
Вылезай оттуда, падла!!!
Комп подох. Котёнка спас.
Неужели так судьбою
Уготована мне месть?
Я вчера, совсем случайно,
Не дал кошаку поесть.
Мозги в черепке с ушами,
Разработав верный план,
Доказали, что процессор -
И котёнку по зубам!
Выпил водки, взял заначку,
Молча прусь я в магазин...
Не забудьте о подкормке
Своих маленьких скотин!
=)
+146
http://dl.dropbox.com/u/24195734/gets/govnoget7333.png
Гет, нах
+146
Я заебался жать на рефреш весь долбанный день со всех устройств, чтобы запостить гет
+147
Рефакторинг всего сайта.
В html:
<a class="gal" href="ссылка">
<p><img width="96" height="63" alt="" src="image.jpg"></p>
<p>Название</p>
</a>
В админке уже сделал ресайс изображений!
И вдруг оказывается в CSS:
.gal img {
border: 1px solid #F4EDDC;
display: block;
height: 100px;
margin: 0 auto;
width: 160px;
}
Изменить дело 5 сек.. Но зло берет.
+147
<?
out_banner_java(); // Выводим Java Script для слайдера
?>
+127
<HTML>
<HEAD>
<TITLE>Free Web Graphics - Buttons, Backgrounds, Dividers, Bullets...</TITLE>
<meta name="author" content="EverEden Design">
<TITLE>Contact Us </TITLE>
</HEAD>
<BODY BGCOLOR="FFFFFF" BODY BACKGROUND="/images/whstuccobk2.gif" TEXT="#003333" LINK="#660033" VLINK="#003333" ALINK="#660033">
...
<HTML>
<HEAD>
<TITLE>Contact Information</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF" TEXT="#990066" LINK="#006633" VLINK="#339900">
...
</BODY>
</HTML>
Эта страница была сделана явно для проверки HTML-парсеров=)
http://www.graphics-4free.com/contact.html
+132
# <connection id="ftp_cpe02">
# <user value="*****" />
# <password value="*****" />
# <host value="*********" />
# <passive value="true" />
# <path value="/var/logs" />
# </connection>
Новый опус от техподдержки.
Раздел как бэ закомментирован
+137
-define(NO_AGE_GROUP, "0").
-define(BELOW_18, "1").
-define(ABOVE_18, "2").
Это Erlang если что...
Если не в курсе, то двойные кавычки в Erlang это короткая запись создания списка, естественно, как списки эти константы никогда не используются.
+132
open System.Net
open System.Text.RegularExpressions
open System.Text
open System
type userInfo =
{ User : string;
Rating : double;}
let mutable Users = []
(* Заполняем списки юзверей *)
let getUsersInfo s =
let mutable m = Regex.Match(s, @">(?<user>[^<]+)</a></td>\s+<td class=""strength"">[^<]+</td>\s+<td class=""rating""><strong>(?<rating>[^<]+)") //+ Оптимизировать регулярку. (Page 2)
while(m.Success) do
let info = {User = m.Groups.["user"].Value; Rating = m.Groups.["rating"].Value |> double}
Users <- Users @ [info]
m <- m.NextMatch()
(* скачивание страницы по индексу *)
let getSourceForUsers p =
let url = "http://freehabr.ru/people/good/page" + string(p)
let wc = new WebClient();
let s = wc.DownloadString(url);
printfn "Разобрана %i страница" p
getUsersInfo s
(* получить индекс последней страницы *)
let getLastPage =
let wc = new WebClient()
wc.Encoding <- Encoding.UTF8
let s = wc.DownloadString "http://freehabr.ru/people/"
Regex.Match(s,@"(?<=e)\d+(?=/"">п)").Value |> int
let lastPage = getLastPage
let printList a =
a |> List.iter (fun x -> printfn "%s рейтинг - %.2f" x.User x.Rating)
Console.ReadKey() |> ignore
[<EntryPoint>]
let main(args:string[]) =
printfn "Парсер юзерей с положительным (или нулевым) рейтингом"
printfn "%i -- Количество страниц" lastPage
printfn "scan --XX - __ Cбор списка пользователей от первой страницы до XX"
printfn "scan --YY --XX __ Сбор списка пользователей от YY страницы до XX. \nXX не может быть больше, чем максимальное количество страниц в списках юзеров с положительной кармой"
let userInput = Console.ReadLine();
match userInput with
| _ when userInput.StartsWith "scan --" -> let a = Regex.Split(userInput,"--")
let dig = a.[1] |> int
if a.Length = 2 then // для первого варианта
[1 .. dig]
|> List.iter getSourceForUsers
else // для второго
[ dig .. a.[2] |> int ]
|> List.iter getSourceForUsers
printfn "~~~\nЮзеры посчитаны"
| _ -> printfn "Завершение приложения"
exit(1)
printfn "~~~~\nОбработка списка\n~~~~"
printfn "usersGreaterRate --XX __ Показать пользователей,\nу которых рейтинг больше или равен XX"
printfn "usersLessRate --XX __ Показать пользователей,\nу которых рейтинг меньше или равен XX"
printfn "usersWithNamesBegins --String __ Показать пользователей,\nу которых имя начинается со строки String"
let usersOper = Console.ReadLine()
let param = Regex.Split(usersOper," --").[1]
match usersOper with
| _ when usersOper.StartsWith "usersGreaterRate --" -> Users
|> List.filter (fun x -> x.Rating > (param |> double))
|> printList
| _ when usersOper.StartsWith "usersLessRate --" -> Users
|> List.filter (fun x -> x.Rating < (param |> double))
|> printList
| _ when usersOper.StartsWith "usersWithNamesBegins --" -> Users
|> List.filter (fun x -> x.User.StartsWith param)
|> printList
| _ -> printfn "Завершение приложения"
exit(1)
0