Subversion Repositories VORC

Rev

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

Rev 24 Rev 53
Line 14... Line 14...
14 
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;
 14 
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;
15 
my $user = getUser ($EML);
 15 
my $user = getUser ($EML);
16 
my $username = $h->a ({ href=>"/schedule/manage_user.pl?submit=View&RCid=$user->{RCid}" }, $user->{derby_name});
 16 
my $username = $h->a ({ href=>"/schedule/manage_user.pl?submit=View&RCid=$user->{RCid}" }, $user->{derby_name});
17 
my $RCid = $user->{RCid};
 17 
my $RCid = $user->{RCid};
18 
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
 18 
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
19 
my $YEAR;
 19 
my $YEAR = 1900 + (localtime)[5];
Line 20... Line 20...
20 
 
 20 
 
21 
 
 21 
 
22 
my $pageTitle = "Dev Log Viewer";
 22 
my $pageTitle = "Dev Log Viewer";