App-PhotoDB
view release on metacpan or search on metacpan
lib/App/PhotoDB/commands.pm view on Meta::CPAN
The C<data> command provides a set of subcommands for entering sundry data. You shouldn't really need these as data can be entered inline at the point of use.
=head3 data bodytype
Add a new camera body type
=head3 data flashprotocol
Add a new flash protocol to the database
=head3 data focustype
Add a new type of focus system to the database
=head3 data format
Add a new film format to the database
=head3 data manufacturer
Add a new manufacturer to the database
=head3 data meteringtype
Add a new type of metering system to the database
=head3 data negsize
Add a size of negative to the database
=head3 data process
Add a new development process to the database
=head3 data shutterspeed
Add a new shutter speed to the database
=head3 data shuttertype
Add a new type of shutter to the database
=cut
$handlers{data} = {
'bodytype' => { 'handler' => \&camera_addbodytype, 'desc' => 'Add a new camera body type' },
'flashprotocol' => { 'handler' => \&flashprotocol_add, 'desc' => 'Add a new flash protocol to the database' },
'focustype' => { 'handler' => \&focustype_add, 'desc' => 'Add a new type of focus system to the database' },
'format' => { 'handler' => \&format_add, 'desc' => 'Add a new film format to the database' },
'manufacturer' => { 'handler' => \&manufacturer_add, 'desc' => 'Add a new manufacturer to the database' },
'meteringtype' => { 'handler' => \&meteringtype_add, 'desc' => 'Add a new type of metering system to the database' },
'negsize' => { 'handler' => \&negativesize_add, 'desc' => 'Add a size of negative to the database' },
'process' => { 'handler' => \&process_add, 'desc' => 'Add a new development process to the database' },
'shutterspeed' => { 'handler' => \&shutterspeed_add, 'desc' => 'Add a new shutter speed to the database' },
'shuttertype' => { 'handler' => \&shuttertype_add, 'desc' => 'Add a new type of shutter to the database' },
};
=head2 db
The C<db> command provides a set of subcommands for managing the database backend.
=head3 db backup
Back up the contents of the database
=head3 db logs
Show activity logs from the database
=head3 db stats
Show statistics about database usage
=head3 db test
Test database connectivity
=head3 db upgrade
Upgrade database to the latest schema
=cut
$handlers{db} = {
'backup' => { 'handler' => \¬implemented, 'desc' => 'Back up the contents of the database' },
'logs' => { 'handler' => \&db_logs, 'desc' => 'Show activity logs from the database' },
'stats' => { 'handler' => \&db_stats, 'desc' => 'Show statistics about database usage' },
'test' => { 'handler' => \&db_test, 'desc' => 'Test database connectivity' },
};
=head2 enlarger
=head3 enlarger add
Add a new enlarger to the database
=head3 enlarger info
Show information about an enlarger
=head3 enlarger sell
Sell an enlarger
=cut
$handlers{enlarger} = {
'add' => { 'handler' => \&enlarger_add, 'desc' => 'Add a new enlarger to the database' },
'info' => { 'handler' => \&enlarger_info, 'desc' => 'Show information about an enlarger' },
'sell' => { 'handler' => \&enlarger_sell, 'desc' => 'Sell an enlarger' },
};
=head2 exhibition
The C<exhibition> command provides a set of subcommands for managing exhibitions.
=head3 exhibition add
Add a new exhibition to the database
=head3 exhibition info
Show information about an exhibition
=cut
$handlers{exhibition} = {
'add' => { 'handler' => \&exhibition_add, 'desc' => 'Add a new exhibition to the database' },
'info' => { 'handler' => \&exhibition_info, 'desc' => 'Show information about an exhibition' },
};
=head2 film
The C<film> command provides subcommands for working with individual rolls (or sets of sheets) of film.
=head3 film add
Adds a new film to the database, e.g. when it is purchased.
=head3 film annotate
Create a text file in the film scan directory with summary info about the film & negatives
=head3 film archive
Put the film in a physical archive
( run in 1.029 second using v1.01-cache-2.11-cpan-2398b32b56e )