HTTP::Server::FFRIndexed - HTTP server for the file index
#!/usr/bin/perl -w use strict; use HTTP::Server::FFRIndexed; HTTP::Server::FFRIndexed ->new(columns => [qw[mime_type artist album track title ]], dsn => "dbi:SQLite:dbname=$0.sqlite", scan => ["C:/Audio Captures/",], verbose => 1, )->run;
This module implements the controller and server for a FFRIndexed database. It should maybe be split up into the real (HTTP) server and the controller if possible.
The server does currently not enforce Taint Mode and doesn't really validate its input parameters, so it is susceptible both to path attacks and cross site scripting attacks or HTML injection attacks.
__PACKAGE__->new ARGS
Creates a new server instance. The following arguments are recognized:
port
The TCP port to listen on
template
The template directory
columns
The columns to display