my @subjects = [];  # reference to empty array

##</code><code>##

my @subjects;

##</code><code>##

for (my $i = 0 ; $i<scalar @resultLine; $i++) {

##</code><code>##

for my $i (0 .. $#resultLine) {