Subversion Repositories VORC

Rev

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

Rev 38 Rev 50
Line 19... Line 19...
19 
my $day = $dt->day_name;
 19 
my $day = $dt->day_name;
20 
my $date = $dt->date;
 20 
my $date = $dt->date;
21 
my $curtime = $dt->hms;
 21 
my $curtime = $dt->hms;
Line 22... Line 22...
22 
 
 22 
 
23 
#$day = "Wednesday";
 23 
#$day = "Wednesday";
Line 24... Line 24...
24 
#$date = "2022-07-13";
 24 
#$date = "2023-07-13";
25 
 
 25 
 
26 
my %class = qw(
 26 
my %class = qw(
27 
	U Unrestricted
 27 
	U Unrestricted