Simple mp3 broadcaster

Простой консольный скрипт на Perl'е для вещания mp3 потока в сеть. Проигрывает треки случайным образом из заданной директории. Желающие также могут воспользоваться .bat файлом и netcat для этих целей: @ECHO OFF SET music=C:\music\ SET port=1234   FOR /R %music% %%G IN (*.mp3) DO ( echo Playing: %%G echo. ( echo "HTTP/1.0 200 OK\r\nContent-Type: audio/x-mp3stream\r\n\r\n" type […]