for my $valNum (0 .. $total){ #### for my $valNum (0 .. $total-1){