Решение есть. Но в то же время есть ещё одна тонкость. DBB::mysql драйвер имеет опцию автореконнекта (mysql_auto_reconnect) и будет следить за актальностью handle и при случае переконнектится. Но вот что делать с коммандами, которые иногда надо выполнить сразу после коннекта, например SET NAMES ‘utf8′;SET CHARACTER SET ‘utf8′ ? И тут есть решение! Хотя найти его не всегда легко в интернет

Вообщем, вот код для коннекта из под Perl к MySQL так, чтобы всё работало пучком:

$dbh = DBI->connect( "dbi:mysql:database=database_name;mysql_client_found_rows=1;mysql_enable_utf8=1;mysql_socket=/socket_of_mysql", 'user', 'password',
    {
	RaiseError		=> 1,
	AutoCommit		=> 1,
	mysql_multi_statements	=> 1,
	mysql_init_command	=> q{SET NAMES 'utf8';SET CHARACTER SET 'utf8'}
    } ) or die "Cannot connect";
$dbh->{mysql_auto_reconnect} = 1;

Код проверен мною и тщательно протестирован

Автор: lady_spring

(на всякий случай, вдруг ЖЖ опять будет глючить)

ВСЕМ МИТИНГУЮЩИМ

Так. Вот сейчас очень серьезно.

На митинг в субботу придет больше 22 000 человек. Скорее всего, гораздо больше.

Слушайте внимательно.

Уже сейчас некие люди нанимают провокаторов, которые будут провоцировать драки, кричать «Революция» и прочее.
Я уверена, что ВСЕМ нам, протестующим, нужны очень простые вещи: в первую очередь, честные выборы. Повторные. Мы их проведем, мы соберем наблюдателей. Мы добьемся регистрации партий — возможно, и сами ее создадим после 10-го.
Кровопролитие никому не нужно, так?

Я знаю, что так. Поэтому:

1. Не ведитесь на провокации. Прежде чем кричать что-либо вместе с теми, кто стоит рядом, подумайте, разделяете ли вы эти взгляды. Если это призыв к насилию — молчите или кричите «ФУ».
Мы же не стадо.

2. Пожалуйста, будьте внимательны к тем, кто стоит рядом. Не толкайте людей, старайтесь не создавать давки. Если вы видите пожилых людей — старайтесь их пропускать. На митинге будут и беременные женщины, будьте аккуратны, прошу. Мы ВСЕМ покажем, что мы — культурные люди, мы уважаем друг друга.

3. Если даже вы услышите человека, который ЗА единую россию — вы можете посмеяться, можете поговорить с ним, переубеждать его, но не применяйте НИКАКОЙ силы. Ребята, наша сила уже в том, что нас много и мы за правду. Мы не хотим и не будем кого-то бить. Успокаивайте всех, кто агрессивен. УЛЫБАЙТЕСЬ ЛЮДЯМ.

4. Ведите себя в рамках закона. Если кто-то, даже со сцены, призовет рушить стены Кремля — кричите ФУ, не соглашайтесь. НЕ ИДИТЕ МАРШЕМ ПО ГОРОДУ. Я объясню, почему: идущую толпу разобьют на группы и затаскают в автозаки. Нас выставят отморозками и революционерами. Это НЕ ТАК, мы все знаем.

5. Очень важный пункт. Ребята, полиция действительно за нас. Вы знаете, на выборах на моем участке были прекрасные полицейские. Они ослушались комиссию и не удалили меня с участка как наблюдателя (я им объяснила, что удаление незаконно). Они смотрели на меня смущенно и стыдились того, что их заставляют делать.
Ребята, если полиции скажут: мы теперь за народ, мы их защищаем, мы никого не бьем и не тесним — поверьте, они будут кричать от радости еще громче нас.
У них дома жена и дети, им так же страшно, но они НЕ могут бросить все враз.
Поэтому
КАЖДОМУ полицейскому с человеческим лицом и человеческим поведением говорите СПАСИБО, говорите: мы понимаем, что это ваш долг, и мы надеемся сменить ваше начальство, чтобы вы перестали быть рабами.
В Москву привозят чеченские полки. Этих ребят натаскали, чтобы ненавидеть нас, но если они не делают вам ничего плохого — улыбайтесь им, объясняйте, что мы никому не хотим зла.

6. Если вас задерживают — не сопротивляйтесь. Это почти всегда бесполезно, но усугубит ваше положение при аресте. Почитайте правовые советы митингующим.

Поймите одну простую вещь:
Они не боятся отморозков, которые штурмуют Кремль. Потому что таких отморозков можно посадить за решетку и выставить себя правым.
Они не боятся толпы быдла, на которую будет противно смотреть по ТВ. Потому что против нас после этого будут все простые люди.

Они БОЛЬШЕ ВСЕГО боятся, что на площадь выйдут культурные, умные, вежливые люди, которых ДОСТАЛО. И которые готовы к конкретным ПРАВОВЫМ действиям. Если мы требуем перевыборов — мы ПРАВЫ. Если мы требуем свержения Путина (КЕМ БЫ ОН НИ БЫЛ) — мы бездумные революционеры. Не ПРОТИВ чего-либо или кого-либо, а ЗА. В данном случае — ЗА перевыборы.

Если нам не позволят реализовать наше право на выбор, мы всегда успеем собраться ЕЩЕ, и мы будем уже менее миролюбивы.

ОБРАЩЕНИЕ К ОРГАНИЗАТОРАМ:
Прошу вас понять, что с вами будет многотысячная толпа. И, как ни громко это звучит, судьба нашего народа В ВАШИХ РУКАХ. Тщательно продумайте все, что будете говорить на сцене. Не уставайте повторять людям: мы за МИРНОЕ решение проблемы, без крови.
Я была в толпе — все вокруг меня точно так же хотели мира.
Не допускайте на сцену провокаторов, которые будут кричать «революция», «долой власть». Это НЕ ТЕ лозунги, которые нам нужны.
И самое главное: сделайте так, чтобы Первый канал и Россия НЕ СМОГЛИ ОСВЕТИТЬ ЭТО СОБЫТИЕ КАК МИТИНГ ОТМОРОЗКОВ.

Каждый из вас, организаторов и участников: сделайте так, чтобы у них не было НИ ОДНОГО КАДРА с провокациями и драками, с агрессивными лицами и агрессивными лозунгами.

Мы все злимся, нас всех, простите мой французский, ЗАЕБАЛО, но если мы устроим кровопролитие 10-го числа — это будет нашей самой большой ошибкой во всей нашей жизни. И весь наш протест будет бессмысленен. Нас объявят врагами российского народа, врагами их спокойствия, и тогда… Я боюсь, что гражданская война более чем реальна.

Давайте покажем им, что мы не ТОЛПА, мы ЛЮДИ, ГРАЖДАНЕ.

Прошу вас. Ради наших родителей, наших детей, нашего будущего.

Распространите как можно шире, это необходимо.

UPD Ребят, я не ожидала такого резонанса И знаете, я предлагаю на митинге спеть… ГИМН. Я не знаю, придумаем ли мы его. или выберем. Давайте думать. Это будет впечатляюще красиво.
Я горжусь вами, и ваши дети будут вами гордиться.

UPD2 Я вижу. Мне тоже не нравится Путин. Но мы не говорим «Долой Путина как человека», мы говорим «Долой премьер-министра, который позволяет такое». Если мы и будем кричать «Долой Путина» — поймите, что посыл именно таков.
Мы не хотим его убить, Боже избавь. Если он виноват — мы будем его судить. И не так, как судит Басманный суд. Мы будем выслушивать все его доводы.
Но если он виноват — мы не поступим, как Басманный суд, и не оправдаем виновного.

UPD3 Это снова я Перечитала наш текущий гимн. Давайте не будем придумывать ничего нового, а просто разучим полностью его текст к субботе? Кто бы ни писал текст, музыку — это сильно и красиво.

UPD4 Хочу добавить опрос: Как мы митингуем? «Мирно и без провокаций» или «ответим силой на силу». Не получается. Проконсультируйте, плиз

UPD5 Очень правильное обращение к националистам.

Долго искал — можно ли как-то приблизиться к сервису, близкому ShellGuard, и нашел максимально хорошее решение — PuTTY Connection Manager. Эта программа делает следующее — она запускает на каждую консоль новое окно PuTTY как процесс, но интегрирует их в одно Windows окно, делая вкладки (Tabs), переключаться между которыми теперь можно через Ctrl + Tab. Работает очень хорошо, но все таки остался неприятный осадок — было бы замечательно, если бы порядок переключения делался в Most Recent порядке (между наиболее недавно использованными табами). Но этого нет. Еще хочется добавить из минусов — очень медленно развивается разработчиками. И хотя можно запросить и проголосовать за какую либо новую фичу, что-то мне подсказывает, увидеть ее потом можно через N-ое количество лет.

Кстати, как ShellGuard, так и PuTTY — работают с SSH ключами. Если вы не используете SSH ключи для авторизации (то есть работаете по старинке — вводя каждый раз пароль), то очень рекомендую это сделать — удобно, быстро и более безопасно! Конечно, сами ключи для авторизации необходимо защитить паролем, но его надо ввести один раз (для ShellGuard — только при первой сессии и для PuTTY вводится при запуске Pageant из состава PuTTY)

Маленькое вступление — perl имеет механизм чистки уже неиспользуемых переменных. Работает просто - новая переменная всегда имеет счетчик ссылок, равный единице. Этот счетчик увеличивается на единицу, как только вы ставите на ту переменную ссылку или где-то используете эту переменую в функции, а саму функцию передаете куда либо еще — всё это отражается на счетчике. И пока этот счетчик не равен нулю — perl не освобождает память этой переменной. Счетчик также уменьшается на единицу, как только удаляется ссылка на переменную или, как во втором примере — удаляется ссылка на функцию, ее использующую, либо когда переменная становится не нужной после блока {}. Все это работает нормально, и сделано правильно, с точки зрения чистки памяти. Но бывают такие нюансы, о которых просто сходу не додумаешься — я баг искал несколько дней, и кое как нашел. Вообще, в большинстве случаев утечек памяти не будет — надо очень сильно постараться, чтобы они были, или писать программы в стиле 80-х годов, когда был Бейсик (perl позволяет писать в разных стилях) и о локальных переменных никто не думал.

Итак, рассмотрим несколько примеров, когда может быть утечка памяти, которую не так просто заметить:

{
 my $a = {};
 my $b = {};

 $a->{ref} = $b;
 $b->{ref} = $a;
}

Посмотрим, что здесь. Итак, $a — содержит ссылку на хеш-таблицу, $b — на другую. Все они — обернуты в блок. Казалось бы, $a & $b должны освободить память после окончания блока, так как после блока видимость переменных пропадает и в таких случаях perl все очищает. Тем более, ссылки на хеш-таблицы мы никуда не передавали и не возвращали через return. Но все будет не так. $a->{ref} получает ссылку на $b. Если бы этим все и ограничилось — память бы освободилась. Но проблема в том, что $b->{ref} сохраняет ссылку на $a, которая имеет ссылку на $b. Это и есть ключевой момент! Когда две переменные, как либо связаны через ссылки друг на друга (либо прямые ссылки, либо через хеши, как тут, либо через ссылки на функции, их использующие) — очистки памяти не происходит. И все потому, что perl не освобождает $a потому, что $b имеет ссылку на неё (тут счетчик ссылок для хеша под $a равен 2 внутри блока, для хеша под $b также равен 2 внутри блока), а $a имеет ссылку на $b. Когда блок заканчивается, perl уменьшает счетчики ссылок у обоих, и если в обычной ситуации все свелость бы к тому, что в результате у всех наступило бы по «нулям», то здесь у обоих счетчики ссылки так и остануться равными единицами. Выход — можно внутри блока в конце написать undef $b->{ref} (как бы разрубив гордиев узел), тем самым разрушим перекрестность ссылок.

Но есть пример и по интереснее, который приключился со мной. Он примерно, такой:

{
 my $ref = {};
 $ref->{func} = sub
  {
   ...
   $ref->{foo} = 2;
   ...
  }
}

Тут опять же — перекрестные ссылки, но более изощренно. $ref имеет в своем составе ссылку на функцию, например — callback по своей сути, а сам callback внутри себя использует $ref переменную. Выходит, что когда дело дойдет до чистки памяти — будет такая же ситуация — перекрестные ссылки и память не будет освобождена под $ref хеш, так и память переменных стека под sub {} (функции могут «удерживать» данные, которые им доступны из их «контекста» видимости и которые они используют). Как быть?

Второй пример решается одним способом, как ни странно (может есть и другой, с той же undef, но этот самый эффективный и «правильный»). Есть такой сервисный модуль — Scalar::Util с фунцией weaken. Код выше меняется на такой:

use Scalar::Util 'weaken';

{
 my $ref = {};
 weaken $ref;
 $ref->{func} = sub
  {
   ...
   $ref->{foo} = 2;
   ...
  }
}

Функция weaken управляет как раз тем счетчиком ссылок. Если говорить точно, то она перестает «удерживать» счетчик ссылок на тот объект, на который ссылается. А именно, в примере, $ref — удерживает без weaken счетчик на хеш — {}. После $ref = {} счетчик ссылок хеша равен двум — единице он был равен сразу после создания хеша, а затем еще увеличился на елиницу после присвоения $ref-у. Если мы используем weaken $ref, тогда после этого счетчик снова уменьшится на единицу для хеша, а внутри perl данных где-то в глубине это запомнится, и тогда в любой момент, как только perl очистит память под хеш (то есть когда счетчик ссылок станет нулевым), переменная $ref станет равной undef. Но, как правило, если правильно написать программу, возникновение значения undef для $ref нам не помешает. Тут главное, запомнить простое правило — если вы имеете ссылку на функцию, которая сама как либо использует ту переменную, которая ссылается на нее (прямо или опосредовано) — тут надо применять weaken, иначе будет утечка памяти! И это будет не вина perl, а ваша! Я в своей большой практике программирования на perl пока еще не сталкивался с утечкой памяти по вине perl — все было по вине программера, то есть меня

Да, чуть не забыл! Заголовки новых статей блога транслируются в Twitter аккаунт. Поэтому, подписавшись на мой твитт (став фолловером), вы оперативно узнаете о чем-то новом у меня на блоге. Постараюсь скоро написать о Твиттере более подробно.

Вот такая вот фигня с этими флешками…

P.S. Я не знаю, надо ли восстанавливать обратно свойства, но лучше, после форматирования, вернуть опцию обратно. Вдруг для новых флешек она будет включаться — лучше, чтобы все таки она стояла, иначе после записи на нее вытаскивать ее нельзя — часть данных потеряется.

Например, почему смешав желтый и голубой цвет красок, получается зеленый, но почему, когда светят те же лампочки вместе рядом, получается почти белый? Чтобы понять это, для начала надо уяснить себе, что существуют две модели поведения света — отражение от поверхности и излучение света. Краски — это отражение падающего света — там ничего не излучается, а лампочки, как в нашем мониторе, например — это излучение света, т.е. он не падал на поверхность, а сама поверхность его «сгенерировала». Второе, что нам надо знать, чтобы понять поведение смешивания красок, это то, как формируется цвет. Чтобы легче это понимать, я например, представляю в уме круг, где по часовой стрелке идут три сектора — красный (Red), зеленый (Green) и синий (Blue) (сокращенно — RGB). Тут главное запомнить, какие цвета идут между секторами (то есть какой цвет получается, если горят смежные лампочки круга) — красный + зеленый -> желтый, зеленый + синий -> голубой, а синий + красный -> вишневый, а если горят все лампочки трех цветов — белый. Примерно так. Итак, этот круг — представление модели излучения. Далее, я расскажу почему получается с красками иначе. Кстати, остальные цвета получаются, когда любые три лампочки — RGB — горят с «разной силой». Например, серый — это не что иное, как белый, только с меньшей интенсивностью, а коричневый — это когда красная горит сильно, зеленая — чуть слабее, а синяя — еще слабее.

Сами краски ничего не излучают, а отражают только тот свет, который они не поглащают. И тут нам снова может помочь подель RGB. Давайте поразмышляем! Желтая краска — она отражает желтый, значит она отражает красную и зеленую волну (см. выше), а синию — поглощает. Голубая краска - отражает зеленую и синию волну, а красную поглощает. Что получается, когда мы смешиваем краски? Смесь начинает поглощать все волны, которые поглощались каждой краской в отдельности, а отражаются те волны, которые отражались в обоих красках! То есть, смешав желтую и синию, мы получаем цвет, который поглощает и красную и синию волну, но отражает ту волну, которая отражалась обоими — зеленую. Если же мы смешаем вместе с желтым и синим, например, еще и красную, мы получим «грязный» серый, или даже черный цвет, так как красная краска поглощает все волны, кроме красного, а в нашем примере красная волна поглощается всеми красками до этого. Не забывайте, что все эти примеры для «идеальных цветов», в в нашей жизни нет ничего идеального Например, зеленая краска может быть светлозеленой, что значит — она отражает зеленой волны больше, но она и отражает и красную и синию в равной степени, только значительно меньше — именно за счет этого она и светлозеленая (светлозеленый: зеленый + белый, а белый — это когда в равной степени есть каждые три цвета — RGB). То есть, проделав все это с красками светлых тонов, вы будете получать немного другие оттенки (например, смешав светлые краски желтого, синиего и красного, вы получите не черный, серый цвет). Именно на основе отражений формируются цвета в книгах и журналах — там цетыре цвета: желтый,голубой, пурпурный (для простоты в примерах выше я использовал красный, но правильнее этот цвет) и черный. Черный в полиграфии используется для экономии трех других красок и просто для того, чтобы сделать цвет очень черным. А в наших мониторах используется модель излучения цвета.

А теперь о главном — как вставить нужный термин (далее term) поиска в URL поисковой машины туда, где вам надо. По умолчанию, когда вы используете поисковики, term вставляется в конец строки. Но не везде это удобно, а иногда просто и невозможно, чтобы это работало так, как надо вам. Дак вот, чтобы вставить term туда, куда надо, используйте псевдо-слово {searchTerms}, например, вам надо заместо УРЛа в Web Search Pro задать: http://www.robtex.com/ip/{searchTerms}.html (Robtex — поиск IP адреса и информации по нему), или, например: http://www.alexa.com/siteinfo/{searchTerms}#rank (выдача графика популярности сайта по Alexa). Тогда все будет работать как надо!

Итак, чтобы сделать «снимок» экрана в любой программе и в любой момент, достаточно сделать следующее: нажать кнопку «Back», не отпуская, выждать около секунды, и затем, также не отпуская Back, нажать кнопку «Home» (та что единственная реальная кнопка по середине). Если все успешно, вы услышите звук «затвора» фотоаппарата, а сами скриншоты найдете через приложение «Мои файлы» в корневом разделе в папке ScreenCapture. Обратите внимание, что сразу у вас это может не получиться. Главное, здесь определить для самого себя паузу, которую надо выдерживать между нажатием и удерживанием кнопки Back и нажатием Home — выдержите меньше — ничего не произойдет.