Subversion Repositories VORC

Rev

Rev 252 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 252 Rev 295
Line 13... Line 13...
13 
use RollerCon;
 13 
use RollerCon;
14 
use CGI qw/param header start_html url/;
 14 
use CGI qw/param header start_html url/;
15 
my $h = HTML::Tiny->new( mode => 'html' );
 15 
my $h = HTML::Tiny->new( mode => 'html' );
16 
my $dbh = WebDB::connect;
 16 
my $dbh = WebDB::connect;
17 
my $homeURL = '/schedule/';
 17 
my $homeURL = '/schedule/';
18 
my $pageTitle = "MVP Survey Feedback";
 18 
my $pageTitle = "Seminar Survey Feedback";
Line 19... Line 19...
19 
 
 19 
 
20 
my $cookie_string = authenticate (RollerCon::USER) || die;
 20 
my $cookie_string = authenticate (RollerCon::USER) || die;
21 
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
 21 
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
22 
my @ERRORS;
 22 
my @ERRORS;