Select Code to Download

my $marksFile = q{marks.txt};
open my $marksFH, q{<}, $marksFile
...
    chomp $line;
    ...
}