ices0 Плей лист на PERL

24.08.2010

Всем привет у меня такая трабла.

Стоит icecast2 + ices0 всё работает нормально, но когда я прописываю в ices0 <Type>perl</Type> вместо <Type>builtin</Type> в конфиге
и запускаю то появляется ошибка:

1. /usr/local/etc/rc.d/ices0: WARNING: failed to start ices0

вот статья по которой я всё делал _http://www.hilik.org.ua/perl-%D1%81%D0%BA%D1%80%D0%B8%D0%BF%D1%82-%D0%B4%D0%BB%D1%8F-ices/

24.08.2010

смотрите в лог

24.08.2010

а где хранится логи ices ??

24.08.2010

там где указали в настройках базовую директорию ices

25.08.2010

Logfile opened
Initialization of playlist handler failed. []
Ices Exiting...

25.08.2010

неверно значит составлен плейлист

26.08.2010

А как он должен быть составлен?

26.08.2010

покажите свой скрипт хотяб, попробуем поправить

26.08.2010

1. #!/usr/bin/perl -w
2. #Процедура инициализации, обычно тут вызываются все листинги директории с файлами,
3. #подключения к базам и тд и тп
4. sub ices_init {
5. print "Perl subsystem Initializing:\n";
6. return 1;
7. }
8. #Процедура завершения работы ices, тут желательно закрыть все соединения из скрипта
9. #и тому подобное
10. sub ices_shutdown {
11. print "Perl subsystem shutting down:\n";
12. }
13. #А вот это и есть процедура получения нового трека для проигрывания
14. #Мы каждый раз перечитываем всю директорию, на тот случай
15. #на тот случай если появились новые треки для проигрывания на радио
16. sub ices_get_next {
17. print "Perl subsystem quering for new track:\n";
18. #chomp $music[2];
19. $num=`/bin/ls /home/zyat/music/*.mp3 | /usr/bin/wc -l`;
20. @music=`/bin/ls -1 /home/zyat/music/*.mp3`;
21. $play=int(rand($num));
22. chomp $music[$play];
23. return $music[$play];
24. }
26. # Процедура получения информации о треке, для вывода в плеере
27. sub ices_get_metadata {
28. use MP3::Info;
29. $tag = get_mp3tag($file) or die "No TAG info";
30. return "$tag->{TITLE} ";
31. }
33. #
34. sub ices_get_lineno {
35. return 1;
36. }

Вот и всё

26.08.2010

где его расположили и как назвали?
совпадает ли его имя с тем что написано в конфиге?

"Процедуру получения информации о треке, для вывода в плеере"
можно всю "закоментировать"

26.08.2010

Хранится в "/usr/local/etc/modules/" название ices.pm
В конфиге всё верно. "<Module>ices</Module>"

26.08.2010

ices собран с поддержкой perl?

26.08.2010

я собирал через "pkg_add -r ices0" а можно так настроить? устанавливая не из портов.

26.08.2010

незнаю, надо искать недостающий пакет если дело в нем
пс "pkg_add -r ices0" не сборка, а установка пакета

Добавлено спустя 3 минуты 22 секунды:
еще может надо не в local пихать а просто в /etc/modules или /usr/etc/modules