Check script

This commit is contained in:
Filip Gralinski 2020-12-21 11:10:05 +01:00
parent 9a231b39b1
commit fab0bf9478

View File

@ -170,7 +170,7 @@ sub check_if_the_right_task {
# return 0 if $task_id =~ m{^TaskE} and not is_estudent($student_id);
return 0 if $task_id =~ m{^Task[AC]} and is_estudent($student_id);
# return 0 if $task_id =~ m{^Task[AC]} and is_estudent($student_id);
return 1;
}
@ -245,38 +245,6 @@ sub is_estudent {
my $suffix = substr($id, 1);
my %estudents = map { $_ => 1 } split/\n/,<<'END_OF_NUMBERS';
16136
21804
30291
30686
32746
32753
32754
32757
32759
32778
32813
32837
34595
34596
34598
34599
34603
34604
34608
34650
34654
39546
40549
42335
42611
42612
42613
42614
50169
50711
52484
84146
END_OF_NUMBERS
if ($estudents{$suffix}) {