вторник, 21 июня 2011 г.

Деление текстового файла по шаблону

awk '/PATTERN/{i++}{print > "file.out."i}' file

А еще можно воспользоваться утилитой csplit из coreutils. Последний способ намного более удобен :)

пятница, 3 июня 2011 г.

CA сертификаты в Perl-скриптах в Debian

Если ваш скрипт внезапно перестал корректно соединяться с серверами по https и начал возвращать что-нибудь вроде этого:

error: 500 Can\'t connect to www.google.com:443 (certificate verify failed)';
Can't connect to www.google.com:443 (certificate verify failed)

LWP::Protocol::https::Socket: SSL connect attempt failed with unknown errorerror:14090086:SSL routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed at /usr/local/share/perl/5.10.1/LWP/Protocol/http.pm line 51.

Это вполне может означать, что клиент больше не знает где искать CA сертификаты. Помогите ему, подскажите, где искать. Добавьте:

$ENV{HTTPS_CA_DIR}="/etc/ssl/certs";