|
Управление простым проигрывателем MP3 файлов.
Пример реализован на языке Perl. Работа скриптов проверялась в ОС SuSE Linux, но они также должны заработать
в любой другой Unix подобной операционной системе. Функции интерфейса с контроллером, вынесены в отдельный
модуль TeleServ.pm. Необходимо переписать этот файл в какой-нибудь каталог, и соответственно определить
переменную окружения PERLLIB. Проще всего - это добавить в файл /etc/profile строчку:
PERLLIB=”название вашего каталога”
export PERLLIB
Можно указать каталог поиска модулей непосредственно в самом скрипте, добавив в его начало директиву:
use libs “название вашего каталога”
Управление осуществляется с помощью кнопок контролера,
а вся нужная информация о проигрываемой композиции отображается на дисплее контроллера TeleServ в виде
бегущей строки. Для проигрывания MP3 композиций используется проигрыватель
mpg123 (www.mpg123.de).
Установите его в папку "/usr/bin". Для работы с MP3 тегами нам также будет необходим модуль MP3::Tag.
Его можно взять на сервере CPAN (www.cpan.org), просто наберите в командной
строке (из-под учетной записи root):
perl -MCPAN -e 'install(MP3::Tag);'
Замечание, CPAN.pm documentation содержит более полные инструкции, как пользоваться этим удобным средством.
Теперь можно запустить проигрыватель, указав при этом проигрываемый каталог с музыкой, например:
./mp3play /home/Music
Нажатие клавиши “Вверх” на контроллере осуществляет переход на следующую композицию, “Вниз” - на предыдущую,
“Вправо” - остановит проигрывание.
Enjoy!
|
Скачать mp3.pl