Help for this page

Select Code to Download


  1. or download this
    # in commons.pl...
package main;
use DBI;  
use Date::Calc qw( Decode_Date_US Add_Delta_Days);
use File::Copy;
# etc.
  2. or download this
    # in main.cgi...
our $q, $variables;
# or, for < 5.6:
#use vars qw/$q $variables/;

BEGIN { require 'commons.pl' }
  3. or download this
    # in commons.pl, _AFTER_ package main LINE!
our $q = new CGI;
our $variables; # etc.