GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages
SQLite::Work::CGI(3) User Contributed Perl Documentation SQLite::Work::CGI(3)

SQLite::Work::CGI - Report and update a SQLite database using CGI

version 0.1601

    use SQLite::Work::CGI;

    my $obj = SQLite::Work::CGI->new(%args);

This module is an expansion of SQLite::Work suitable for use in a CGI script to report and update a SQLite database.

my $obj = SQLite::Work->new( database=>$database_file, row_ids=>{ episodes=>'title_id', }, join_cols=>{ 'episodes+recordings'=>'title_id', } }, report_template=>$report_template, default_format=>{ 'episodes' => { 'title'=>'title', 'series_title'=>'title', } }, input_format=>{ 'reviews' => { 'Review'=>{ type=>'textarea', cols=>60, rows=>4, } } }, max_sort_fields=>10, sort_label=>'Zsort', sort_reversed_prefix=>'Zsort_reversed_', headers_label=>'Zheader_', show_label=>'Zshow', where_prefix=>'Zwhere_', not_prefix=>'Znot_', );

Make a new report object.

Takes the same arguments as SQLite::Work::new() plus the following additions:

input_format
This contains information about what style of input field should be used for this particular column in this table. This is used for the Edit and Add forms.
max_sort_fields
The maximum number of sort fields required (default: 10)
sort_label
Name of the sort parameter.
sort_reversed_prefix
Prefix of the sort-reversed parameters.
headers_label
Name of the headers parameter.
show_label
Name of the columns-to-show parameter.
where_prefix
Prefix of the 'where' parameters.
not_prefix
Prefix of the not-where parameters.

$obj->do_select($table, command=>'Search');

Select data from a table in the database. Uses CGI to get most of the parameters.

The 'command' is 'Search' by default; if it is something else, then the result generated has edit fields and buttons in it.

Update a single column in a single row, or all columns in a single row.

$obj->do_add_form($table);

Set up for adding a row to the database.

Add a row to a table.

Delete a single row.

Create the search form for the given table.

my $form = $obj->make_search_form($table, %args);

Display the search form for the given table.

Make the table selection form.

Display the table selection form.

Lower-level methods, generally just called from other methods, but possibly suitable for other things.
Print an (error) message to the user.

$self->print_message($message); # error message

$self->print_message($message, 0); # non-error message

Construct a search-a-table form

Construct an add-a-row form.

Make the buttons for the forms.

Make a button for a particular page
Print a selection result. (slightly different for Edits than for Search)

Format the report results If 'command' is 'Search' then use the parent format_report; otherwise make an edit-table.

Make a table for editing a search result.

Make a textarea for editing a search result.

Get the required input field for the table+column

    SQLite::Work
    CGI

    Test::More

To install this module, run the following commands:

    perl Build.PL
    ./Build
    ./Build test
    ./Build install

Or, if you're on a platform (like DOS or Windows) that doesn't like the "./" notation, you can do this:

   perl Build.PL
   perl Build
   perl Build test
   perl Build install

In order to install somewhere other than the default, such as in a directory under your home directory, like "/home/fred/perl" go

   perl Build.PL --install_base /home/fred/perl

as the first step instead.

This will install the files underneath /home/fred/perl.

You will then need to make sure that you alter the PERL5LIB variable to find the modules, and the PATH variable to find the script.

Therefore you will need to change: your path, to include /home/fred/perl/script (where the script will be)

        PATH=/home/fred/perl/script:${PATH}

the PERL5LIB variable to add /home/fred/perl/lib

        PERL5LIB=/home/fred/perl/lib:${PERL5LIB}

perl(1).

Please report any bugs or feature requests to the author.

    Kathryn Andersen (RUBYKAT)
    perlkat AT katspace dot com
    http://www.katspace.com

Copyright (c) 2005 by Kathryn Andersen

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

2022-04-08 perl v5.32.1

Search for    or go to Top of page |  Section 3 |  Main Index

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with ManDoc.