FatStorage is a project mainly written in PERL and SHELL, it's free.
catalyst-based storage system for media, mails and documents
Run script/fatstorage_server.pl to test the application.