NAME

MP3::Podcast - Perl extension for podcasting directories full of MP3 files

SYNOPSIS

use MP3::Podcast;
my $dirbase = shift;
my $urlbase = shift;
my $dir = shift;
my $pod = MP3::Podcast->new($dirbase,$urlbase);
my $rss = $pod->podcast( $dir, "This is a test" );
print $rss->as_string;

ABSTRACT

Create podcast easily from directories, using MP3's own info.

DESCRIPTION

Creates a podcast, basically a RSS feed for a directory full of MP3 files.
Takes information from the MP3 files themselves; it needs MP3 files with 
their ID tags completed.

The bundle includes two programs in the C<examples> dir: C<gen-podcast.pl>, 
used this way:
bash% ./gen-podcast.pl <dirbase> <urlbase> <dir to scan>
that generates a static RSS from a dir, and C<podcast.cgi>, to use from a
webserver. To use it, copy podcast.cgi and podcast.conf to a cgi-serviceable
dir; edit podcast.conf to your liking and copy it to the directory you want.
Copy also .podcast to the directory you want served as a podcast (this is done
mainly to avoid dir-creeping), and also drop
edit also the path to fetch the  MP3::Podcast lib, and call it with 
C<http://my.host.com/cgi-bin/podcast.cgi/<dirname>.rss
The name of the directory to scan will be taken from the URI

METHODS

new

Creates the object. Takes basic info as input: the address of the directory that will 
be scanned, the base URL that will be used to podcast this URL base.

podcast

Creates the podcast for a dir, that is, an RSS file with enclosures 
containing the MP3s it can find in that dir. Information to fill RSS 
fields is contained in the ID3 fields of the MP3 files. 
Returns an XML::RSS object, which you can manipulate, if you feel  
like doing so.

SEE ALSO

Info on podcasting: Podcast in perl: http://escripting.com/podcast/ Podcastamatic: http://bradley.chicago.il.us/projects/podcastamatic/readme.html Examples in the examples dir.

AUTHOR

Juan Julian Merelo Guervos, <jmerelo {at} geneura.ugr.es>. Thanks to Juan Schwindt <juan {at} schwindt.org>, Matt Domsch <matt {at} domsch.com>, Gavin Hurlbut <gjhurlbu {at} gmail.com> and Eric Johnson <eric {at} el-studio.com > for patches, suggestion and encouragement.

COPYRIGHT AND LICENSE

Copyright 2005 by Juan Julian Merelo Guervos

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