MP3::Icecast::Simple - Simple MP3::Icecast wrapper

	use MP3::Icecast::Simple;

	$icy = MP3::Icecast::Simple->new(
		description	=> "Station",
		server		=> '127.0.0.1:8000',
		password	=> 'password',
		local_port	=> 1234,
		bitrate		=> 96
	);
	$icy->play("/path/to/files");

MP3::Icecast::Simple is a simple MP3::Icecast wrapper, that can be used to create a SHOUTcast/Icecast broadcast source easy.

MP3::Icecast module by Allen Day (MP3::Icecast)

Nullsoft SHOUTcast DNAS home http://www.shoutcast.com

 Title	 : new
 Usage   : $icy = MP3::Icecast::Simple->new(%arg)
 Function: Create a new MP3::Icecast::Simple instance
 Returns : MP3::Icecast::Simple object
 Args    : description	Name of the radiostation
	   server	Address and port of SHOUTcast server
	   password	Password to SHOUTcast server
	   local_port	Local port
	   bitrate	Initial bitrate

 Title   : play
 Usage   : $icy->play($dir, $resursive);
 Function: Play a directory of .mp3 files
 Returns : 
 Args    : dirname	Path to direactory with .mp3 files
 	   recursive	Flag determining whether a directory is recursively searched for files (optional)

 Title   : stream (rewrited from original MP3::Icecast package with improvements)
 Usage   : $icy->stream($file, $handle);
 Function: Play a file via socket
 Returns : 1 if file was transmitted successfully,
 	   undef if an error occured
 Args    : file		File to stream
 	   handle	Socket handler

 Title   : updinfo
 Usage   : Not a publick method
 Function: Update current song title on the SHOUTcast server
 Returns : 1 if song title updated successfully,
 	   undef if an error occured
 Args    : description	Name of current song

 Title   : header
 Usage   : Not a publick method
 Function: Create a ICY response header
 Returns : ICY response header
 Args    : none

 Gregory A. Rozanoff, rozanoff@gmail.com

Copyright 2006, Gregory A. Rozanoff

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.