This script does everything you'll require to broadcast mp3s to an icecast server. It even allows you to use LAME (an encoder) to downsample the files automatically. It's not very advanced, and not put together as well as it could be, but here it is.

#!/usr/bin/perl -w

use Getopt::Long; #get this module from CPAN
use strict;
use Shout;        #get this module from www.icecast.org

my %optctl;
my $SIGNEXT=0;
my @filearray;
my @backupfilearray;
my $use_playlist=1;
my $encoder_pre="/usr/local/bin/lame -S -h ";
[download]

Read More...