Скрипт для превращения текста со всякими &xxx; и &#nnn; в нормальный utf8

How-to
#!/usr/bin/perl
use HTML::Entities; 
binmode ("STDOUT", ":utf8"); 
print decode_entities(<>);

Для превращения текста со всякими &xxx; и &nnn; в обычный utf8.

Понадобилось из-за штуки, которая в виде таких numeric character references и character entity references сохраняет всё, что не основные символы (латиница, цифры и что-то ещё по минимуму). Кириллицу, например.
Читать дальше

Скрипт для конвертирования видео-файлов в mp4

How-to
В связи с покупкой нового телефона (Samsung S5230) — возникла потребность конвертировать видео в mp4.

Из найденных решений ничего толком не понравилось. Поэтому решил изобрести еще один велосипед.
Ну а так как я начал немного интересовать Perl-ом — то решил на нем и сваять, т.с. попрактиковаться.
Для работы скрипта нужны ffmpeg и mplayer (а точнее скрипт идущий с ним — midentify).
Проверял на файлах avi и mkv.

Используется элементарно

./tomp4 filename



Читать дальше

Развертывание локального Perl-репозитория CPAN

Web Developer
Инструкция по созданию локального репозитория Perl-модулей, записанных на переносной носитель.

Устанавливаем модуль CPAN::Mini:

# perl -MCPAN -e "install CPAN::Mini"


или для Debian/Ubuntu:

sudo apt-get install libcpan-mini-perl


или для Fedora/RHEL/CentOS:

sudo yum install libcpan-mini-perl


Если все зависимости удовлетворяют модулю, то установка пройдет без проблем.

На следующей стадии загружаем копию репозитория на сменный носитель
(загружается около 1 Гб данных):

Читать дальше

Установка Apache + MySQL + PHP/Perl

Руководство
Предположим, что ставить мы его будем на Дебиан (самый распространенный вариант) или Убунту (дома у меня такой).

Для работы с нормальной нагрузкой такому серверу необходимо не менее 256 Мб оперативной памяти. Это Мускль большинство хавает.

Итак, заходим по ssh или просто садимся за свой сервер (если он под рукой). На нем уже должен стоять Дебиан или Убунту.

Читать дальше