This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include "queue.h" | |
#include <stdio.h> | |
#include <stdlib.h> | |
#include <unistd.h> | |
#include <pthread.h> | |
#define THREADS 3 | |
/** | |
* Task queue. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
=pod | |
Есть таблица mysql, которая описывает древовидную структуру: | |
CREATE TABLE `tree` ( | |
`id` int(10) unsigned NOT NULL auto_increment, | |
`parent_id` int(10) unsigned NOT NULL default '0' COMMENT 'указывает на родителя', | |
PRIMARY KEY (`id`) | |
) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# ------------------------------------------------------------------------ | |
# Тестовое задание. Mojolicious: | |
# Напишите веб-приложение при запросе GET /user/info с "Accept: application/json" | |
# отдающее json в формате { ip : "IP address", os : "Operation system", browser : "Browser name" } | |
# Без "Accept: application/json" отдающее html в формате: | |
# IP: IP address | |
# OS: Operation system | |
# Browser: Browser name |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
NAME=$(git branch | grep '' | sed 's/ //') | |
MSG=$(head -n 1 "$1"); | |
if [[ ! "$MSG" =~ "$NAME" ]]; then | |
echo "$NAME"' '"$(cat $1)" > "$1" | |
DESCRIPTION=$(git config branch."$NAME".description) | |
if [ -n "$DESCRIPTION" ]; then | |
echo "" >> "$1" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <stdio.h> | |
#define TEST_MAX_SUM_OF_INC_SUBSEC_(a, ok) \ | |
errors += test_( (a), sizeof((a)) / sizeof((a)[0]), (ok) ) | |
static long max_sum_of_inc_subseq_( const int *array, size_t size ) | |
{ | |
long sum_max = 0; | |
if( array ) { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Поначалу захотелось Mojo::DOM. Когда-то использовал этот модуль в качестве замены HTML::DOM (он кошмарен), | |
и не разочаровался. Вменяемый набор методов, но... На XML от 100 Mb он так тормозил, что сразу отбросил. | |
OK, идём по классике: XML::LibXML. Из плюсов: | |
1) хороший комбайн с кучей возможностей (хотя, как и любое универсальное, для конкретных задач может быть громоздок) | |
2) вполне шустро | |
3) приятная мелочь: умеет обрабатывать NS в атрибутах (все следующие варианты - нет, и если мы не знаем заранее какие | |
NS могут встретиться, приходится заморачиваться отдельно; дальше отдельно про NS упоминать не буду) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# ------------------------------------------------------------------------------ | |
# Напишите скрипт, получающий в качестве параметра путь к XML-файлу и выдающий | |
# на STDOUT следующее: | |
# * суммарное число букв внутри тегов, не включая пробельные символы | |
# (<aaa dd="ddd">text</aaa> - четыре буквы) | |
# * суммарное число букв нормализованного текста внутри тегов, включая пробелы | |
# * число внутренних ссылок (теги <a href="#id">) | |
# * число битых внутренних ссылок (ссылки на несуществующие ID элементов) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# ------------------------------------------------------------------------------ | |
# Напишите скрипт, получающий в качестве параметра путь к XML-файлу и выдающий | |
# на STDOUT следующее: | |
# * суммарное число букв внутри тегов, не включая пробельные символы | |
# (<aaa dd="ddd">text</aaa> - четыре буквы) | |
# * суммарное число букв нормализованного текста внутри тегов, включая пробелы | |
# * число внутренних ссылок (теги <a href="#id">) | |
# * число битых внутренних ссылок (ссылки на несуществующие ID элементов) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# ------------------------------------------------------------------------------ | |
# Напишите скрипт, получающий в качестве параметра путь к XML-файлу и выдающий | |
# на STDOUT следующее: | |
# * суммарное число букв внутри тегов, не включая пробельные символы | |
# (<aaa dd="ddd">text</aaa> - четыре буквы) | |
# * суммарное число букв нормализованного текста внутри тегов, включая пробелы | |
# * число внутренних ссылок (теги <a href="#id">) | |
# * число битых внутренних ссылок (ссылки на несуществующие ID элементов) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
# ------------------------------------------------------------------------------ | |
# Напишите скрипт, получающий в качестве параметра путь к XML-файлу и выдающий | |
# на STDOUT следующее: | |
# * суммарное число букв внутри тегов, не включая пробельные символы | |
# (<aaa dd="ddd">text</aaa> - четыре буквы) | |
# * суммарное число букв нормализованного текста внутри тегов, включая пробелы | |
# * число внутренних ссылок (теги <a href="#id">) | |
# * число битых внутренних ссылок (ссылки на несуществующие ID элементов) |
NewerOlder