Select Code to Download

sub ReadFile
{
        #Declare Variables
...
        #
        return @contents;
}

#!/usr/bin/perl5

use strict;
...
foreach my $game (@games) {
        print "$game\n";
}

Bareword "HL1" not allowed while "strict subs" in use at ./games.pl li
+ne 8.
Bareword "HL1" not allowed while "strict subs" in use at ./games.pl li
+ne 8.
Bareword "txt" not allowed while "strict subs" in use at ./games.pl li
+ne 8.
...
Bareword "HL1" not allowed while "strict subs" in use at ./games.pl li
+ne 8.
Bareword "txt" not allowed while "strict subs" in use at ./games.pl li
+ne 8.
Execution of ./games.pl aborted due to compilation errors.