Filesys::Virtual::DAAP - present a DAAP share as a VFS
use Filesys::Virtual::DAAP;
my $fs = Filesys::Virtual::DAAP->new({
host => 'localhost',
port => 3689, # the default
cwd => '/',
root_path => '/',
home_path => '/home',
});
my @albums = $fs->list("/Library");
my @playlists = $fs->list("/Playlists");
The module can be used to republish a DAAP share. You'll probably want to use
Net::DAV::Server or POE::Component::Server::FTP to re-export it in a
browseable form.
Richard Clamp <richardc@unixbeard.net>
Copyright 2004 Richard Clamp. All Rights Reserved.
This program is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.
Net::DAAP::Client::Auth, Net::DAV::Server, POE::Component::Server::FTP