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