Subversion Repositories PEEPS

Rev

Rev 2 | Rev 4 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2 Rev 3
Line 13... Line 13...
13 
use Email::Valid;
 13 
use Email::Valid;
14 
use WebDB;
 14 
use WebDB;
15 
use HTML::Tiny;
 15 
use HTML::Tiny;
16 
use Data::Dumper;
 16 
use Data::Dumper;
17 
our $h = HTML::Tiny->new( mode => 'html' );
 17 
our $h = HTML::Tiny->new( mode => 'html' );
- 
 
 18 
$ENV{HTTPS} = 'ON';
Line 18... Line 19...
18 
 
 19 
 
19 
my ($FORM, $cookie_string, $ERRMSG);
 20 
my ($FORM, $cookie_string, $ERRMSG);
20 
my @ERRORS;
 21 
my @ERRORS;
21 
my $dbh = getDBConnection ();
 22 
my $dbh = getDBConnection ();