filipg/djfz-2020
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix

Browse Source
This commit is contained in:
Filip Gralinski 2021-01-21 13:52:04 +01:00
parent 8b6637a330
commit 91d7d45aff
1 changed files with 22 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
count-points.pl
View File

@ -110,6 +110,12 @@ sub process_report {
my ($points, $deadline, $total, $remainder) = parse_description($task_id); my ($points, $deadline, $total, $remainder) = parse_description($task_id);
if (is_estudent($student_id)) {
if ($task_id =~ /F..$/) {
$deadline = '2021-01-25 23:59:59';
}
}
print $task_id, " ", ($success ? "PASSED" : "FAILED"); print $task_id, " ", ($success ? "PASSED" : "FAILED");
if (!check_deadline($task_id, $deadline)) { if (!check_deadline($task_id, $deadline)) {
@ -245,6 +251,22 @@ sub is_estudent {
my $suffix = substr($id, 1); my $suffix = substr($id, 1);
my %estudents = map { $_ => 1 } split/\n/,<<'END_OF_NUMBERS'; my %estudents = map { $_ => 1 } split/\n/,<<'END_OF_NUMBERS';
500276
44517
500259
42720
44519
500271
42611
39546
42612
44416
25077
16136
32754
44522
44523
42614
END_OF_NUMBERS END_OF_NUMBERS
if ($estudents{$suffix}) { if ($estudents{$suffix}) {